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Remarques sur les operations disques (61 28) 

Ne vous inqutetez pas si vous 6tes un peu deconcerte par le "jargon" infonnatique de cette section ; 
I'importance de ces avertissements deviendra plus clair au fur et a mesure que vous avancerez 
dans cemanuel. 

1. N'allumez ou n'6teignez pas le 6128 avec un disque dans le lecteur. Si vous la faites, la 
disquette peut etre alteree, perdant ainsi vos donnees et programmes. 

2. Faites toujours des copies de sauvegarde des disques contenants des programmes precieux. 
II est specialement important de realiser une copie de sauvegarde du disque systeme CP/M 
foumi avec le 6128, car si vous effacez accidenteUement ou abtmez votre disque, son 
remplacement peut revenir cher. 

3 . Assurez-vous de ne pas ecraser accidenteUement votre disquette systeme CP/M en ouvrant 
toujours les opercules de protections en ecriture. 

4. Pour un maximum de fiabilite des donnees, la partie lecteur de l'ordtnateur ne DOIT pas 
She plac6 directement devant le moniteur, mais a sa droite. Ne placez pas la machine prfit 
d'un source d'interference electrique. 

5. Ne toucbez jamais la surface de la disquette elle-merne. 

6. N'ejectez pas une disquette pendant une lecture ou une ecriture. 

?. Souvenez-vous que le formatage d'une disquette effacera son contenu. 

8. Protegez toujours les lecteurs et les disquettes de tous champs magndtiques. 

9. La licence d'exploitation pour votre disquette systeme CP/M ( qui possede un numero de 
s6rie) permet son utilisation avec un seul ordinateur . En particulier, cela signifie qu'il vous 
est interdit de donner a une autre personne un disque CP/M avec votre numero de sdrie. 
Prenez soin de lire le licence d'exploitation (Annexe 1), a la fin de ce manuel. 
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Chapitre 1 
Cours etementaire 



Partie 1 : Mise en marche 

Les 464/6128 peuvent fooctiooner avec : 

1 Le moniteur monochrome AMSTRAD MM12 

2 Lc moniteur couleur AMSTRAD CM14 
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Choisir entre BASIC et le jeu de demonstration. 

La cartouche fournie avec votre 464/6128 contient a la fois 1c BASIC AMSTRAD et un jeu de 
demonstration. Pour lancer le BASIC, pressez la touche marquee [ft] (qui se trouve a la droite du 
clavier) dans les 30 secondes suivant l'allumage de rordinateur. Si vous appuyez sur la touche 
[f2] ou si vous De frappez pas la touche [fl] dans les 30 secondes suivant la mise en route, alors 
le jeu de demonstration s'executera. 

Un mode d'emploi complet du BASIC AMSTRAD est donne" plus loin dans ce manueL 

NB. Pour lancer le jeu de demonstration apres avoir utilise" le BASIC AMSTRAD, tapez la 
commande | GAME et tapez sur la touche [ENTER]. Le signe j est obtenu en tenant la toucbe 
[SHIFT] enfoncee et en appuyant simultaneWnt sur la touche comportant les signes @ et |. 
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Partie 2: Connexion de vos peripheriques **•• 

dm section vous explique commeot connecter les divers penpheriques et extensions a voire 
m^min Des details sur leur fonctionnement propre sont donnas dans les parties concernees de 

el Un diagramme vous permettant d'identifier les differentes prises est unprim6 dans le 

; 6, Partie 9. 
rAN T :N EjAMAISCONNECTEROUDECONNECTERDEPERIPHERIQUES 

QUAND L'ORDINATEUR EST ALLUME. 

Manettes de jeux 

Us 46V6128 soot fournis avec une manette de jeux. n est cependant possible d'ajouter une 

Bt^ manette dans le cas ou vous jouez frequemment avec des logiciels permettant la gesUon 

4k, pfr 1 **"™ manettes. 

r^nlii ia fiche de la manette d'origine a la prise "Joystick 1" situee sur le cote" gauche de 

rjfciT Les 464/6128 peuventetre equipes de deux manettes. La seconde doit etre connectee 

t to pnte "Joystick 2", elle aussi situee sur le cote" gauche de la machine. 

Ob pin m^a informations sur l'ecriture de programmes de gestion des joysticks sont decrits 

■In loin (tans ce manueL 

Crayon optlque/Pistolet 

Les crayom optiques et les pistolets sont des extensions utilisables avec les 464/6128 par 

InfcnDfttiaire de jeux exploitant les possibility d'un pistolet ou par divers logiciels tels que les 

^ ..^. ■ ■■nrj de graphisme pour les crayons optiques. 

Coneder la fiche situee a I'extremit* du cable du pistolet ou du crayon optique a la prise 

AUXiHalre situee sur la gauche de 1'appareil. 

Cka penphenques ne peuvent etre exploites que par des logiciels (sur cassette, disquette ou 

camcbe) specialemeot ecrits pour les gerer. 
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Joystick analoglque 

Vous pouvez acheter un joystick analogique, ce type de p6riph£rique etant connectable sur 
464/6128 et utilisable avec des jeux specialement Merits pour permettre on controle par joystick 
analogique, notamment la touche "fire". Un joystick analogiquc permet un controle phis soptais- 
tiqu6 qu'une manette de jeux ordinaire. 

Connecter la fiche du joystick analogique a la prise "Analog" situee sur le cote" gauche de 
l'ordinateur. 

Un joystick analogique ne peut 6tre totalement exploit** que par un jeu specialement ecrit 4 cet 
effet En principe, ce type de jeu n'est disponible que sur cartouche, 

Imprimante ■■***' 

Les 464/6128 gere toutes les irnprirnantes paralleles compatibles Centronics. Vous aurez besoin 
d'un cordon adaptC qui, normalement, est fourni avec rimprimante. 

Connecter l'extremitt a 25 broches du cable a la prise prevue a cete^al'axrieredel'ordirjateur. 
Connecter Pautre extrfmite equipee d'une prise Centronics a 36 brocbes a la prise appropriee 
situee a Parriere de l'imprimante. Si r im prima n te est equipee de 'tups*' de s£ctmte, positionnez- 
les dans les encocbes situees de chaque cote de la prise du cable. 

UB PAS relier ce cfible a la prise Centronics 36 broches au connecteur situe" a rarriere du 6128. 
Celui-ci n'est pre*vu QUE pour le raccordement d'un second lecteur de disquettes. 

Des details sur le maniement de rimprimante sont donnes plus loin dans ce manueL 
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Amplificateur et enceintes externes 

Les 464/6128 peuvent Stre reli6s a un amplificateur stereo externe. Le cable partant vers la prise 
"Entice" votre amplificateur st6r6o devra se terminer par un jack st6r6o de 3,5 mm qui viendra 
s'enficher dans la prise stereo situee a l'arriere de l'ordinateur. 

L'ordinateur enverra un signal de niveau constant vers la sortie stereo. Le volume devra fctre r6gl6 
«ir ramplificateur proprement diL 

P6riph6riques d'extension 

Votre machine comporte egalemeut une prise 50 broches permettant de raccorder des extensions 
telles qu'une interface s6rie, ua modemetc. Vous trouverez, en principe, tous les details concemant 
^installation de ces penph6riques dans le manuel avec lequel ils sont fournis. 

Second Lecteur de disquettes (6128 unlquement) 

Une prise est prfvue pour la connexion d'un deuxieme lecteur de disquettes. Les tostructioos 
completes se rapportant a son installation et a son mode de fonctionnement sont g6neralemeut 
foumies avec ce lecteur. 
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Partie 3 : Les disquettes et les cassettes 



La memoire du 464 n'est capable de stacker des donnees que lorsque la machine est allumee. En 
temv. informatique, cela s'appelle un support "volatile". Si vous desirez conserver des pro- 
grammes ou des donnees lorsque la machine est eteinte, alors elks doivent etre stockees sur une 
cassette ou une disquette. 

Contrdle des cassettes (464 uniquement) 

A la droite du clavier se sitae le lecteur de cassettes. La mecanique de ce systeme est simflaire a 
celle d*un magnetophone a cassettes audio. L'electroniqoe affcctee au controle des signaux est 
specifique et optimisee pour I'utilisation en tant que systeme de stockage des donnees. 




Comment inserer la cassette dans le tecteur. 
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Les touches de fooction do lecteor de cassettes s'lrtilisent de U mftme f ac« que fxwr im lecteur 
de cassettes audio. 
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Touches de contrite du lecteur du 464 
Notez que ces touches doivent etre pressee beaucoup plus fort que celles du clavier principal. 
[REC] - [REC]ord (foncuOnne simultanementavec [PLAY] pour enregistrer des donnees loreqoe 
te programme indique de le faire). Cette touche ne pent etre activee lorsqu'une cassette protegee 
est placee dans le lecteur ou lorsque la porte du lecteur est ouverte. 

Pouractiver cette fonction, appuyez sur la touche [REC] et, en la tenant enfbncee, pressez en 
mtae temps la touche [PLAY]. Des donnees seront alorsecritessiirU cassette qiiaiidl'oiduiateur 
domera les instrnctions necessaires soit par l'toteim6diaire du programme en cours d'execuuon, 
soit par une commande SAVE entree directement au clavier. 

[PLAY] - [PLAY] permet de CHARGER et d'EXECUTER un programme content] sur la 
cassette. L'ordinateur lira les donnees sur la cassette lorsque l'ordre lui sera donne de le faire par 
le programme contenu en memoire ou par une commande frappee directement au clavier. Les 
deux touches [REC] et [PLAY] sont munies d'un dispositif dejection qui les remet en place en 
fin de bande. 

[REW] - touche de rembobinage rapide. D n 'y a pas dediaposittfd'eje^onde Utouche en fin 
de bande, anssi est-il preftraMe de ne pas laisser la inachine fonctionner en mode rernbc*mage 
sous peine de surchaufie du moteur lore d'un blocageen fin de bande. 

[F.F.J - touche d'avance rapide de la bande. Comme aucun mecanisme d'arret automatique en 
fio de bande n'est prevu sur cette touche, il convient 6galement de ne pas laisser cette operation 
ae faire seule sous peine de surchauffe du moteur en cas de blocage en fin de bande. 
fSTOP/EJECT] - Antte toute operation en cours sur la cassette et rameiK les touches dans leur 
petition initiale. D suffit alors d'appuyer une nouvelle fois sur cette touche pour que la cassette 
so* ejectee, ce qui permet alors de la retirer ou de la n^lacer correctemenL Vous ne devez pas 
retirer une cassette si une operation d'acces au lecteur n'est pas achevee. 

PAUSE] - Le mecaniame de pause fonctionne avec les touches [PLAY] et [REC] utflisces 
ensemble ou separexnent Elk ne doit pas etre employee lore d'une operation de lecture ou 
d*ecriture des donnees sous peine d'erreur. Les pauses pendant des operations de lecture ou 
tfeoregiatrement peuvent etre gerees par des commandes internes du 464, ce qui permet une 
AlMaation moins frequente de cette touche. 
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Protection en Scriture 




Pour proteger les donnees que vous souhaitez conserver contre un 6ventuel effacement accidentel, 
un systeme de verrouillage par languette se trou ve sur toutes les cassettes standard. Cette languette 
peut etre retiree au moyen d'une pincette, etc.. n vous sera impossible d'enf oncer Jatouche fREC] 
si une cassette protegee se trouve dans le lecteur. 

Ce type de protection s'applique individueUement a CHAQUE FACE de la cassette, aussi, pour 
proteger les deux faces, il convient de faire sauter les deux languettes. Si vous voulez avoir a 
nouveau la possibilite d'eerire sur une cassette prealablement protegee, il suffira de boucher le 
trou genere par renlevement de la languette. Pour ce faire, vous pouvez recouvrir la petite 
ouverture d'un morceau de papier adhesif, par exemple. 

n existe de oombreuses fa^ons de proteger un programme par l'emploi de commandes inherentes 
au464. 

Chargement de la cassette 

La cassette doit etre complfetement rembobinee. Si ce n'est pas le cas, presses la touche [R EW] 
jusqu'au blocage du moteur en fin de bande. Si la bande est accidentellement devidee par 
rouverture superieure de la cassette, vous devez la rembobiner a Pinterieor du bottier avant 
d'inserer la cassette dans le lecteur. Vous risqueriez autrement de perdre des donnees ou meme 
d'endommager ou briser la bande. 

Notez que bien qu'il soit possible d'utiliser sur un systeme audio des cassettes ayant subi diverses 
formes de dommages tels que des passages frequents ou des plis sur la surface de la bande, en 
revanche, il ne fautpas "maltraiter 1 ' des cassettes informatiques de la meme facon si vous ne voulez 
pas alterer leur fiabilite. 

Par exemple, si vous coincez une bande deroulee par rouverture de la cassette dans la porte du 
lecteur ou si vous avez tout autre ennui du meme style, essayez de charger correctement le 
programme malgre tout Si le chargement s'effectne normatement empressez-vous de le sauve- 
garder sur une cassette intacte et jetez la cassette endommagee avant d'etre tent£ de la reutiliser. 
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Insertion des disquettes 

Chaque face d'une disquette peut ette utilisee separtment Lc disque doit fttre insert etiquette vera 
voas et la face a lire vers le haut 
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Protection contre P6criture 

Une fleche montrant une petite encoche obturee par ime languette est situee sur k cOte gauche de 

chaque face d'une disquette vierge. C'est le systeme de protection contre recritiire visant a 
proteger les donnees contre reffacement on i'ecrasement 



Syatsma 
d« protection 




Lorsqoe l'encoche est boucbee, l'ordinateur peut ecrire des donnees sur le disque. Par contre, si 
elle est ouverte, l'ecriture de donnees ne sera pas permise, ceci afin d'6viter reffacement 
accidentel de programmes importants. 

Les fabricants de disquettes emploient differents mecanismes d'ouverture et fermeture de l'en- 

coche de protection. Sur une disquette de type courant, la marche a suivre est la suivante : 

Pour ouvrir l'encoche, faites glisser la petite languette situee sur le cote" gauche du disque. 



Trou do protaction (OUVERT) 



Taquat 
OUVERT 



& 



Proteg* contra 
I'acritura 

U 



Taquet XD 
FERME^"^ 




Pout tenner l'encoche, bougez la languette dans la position inverse. 
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D'autres types de disquettes possedent un petit levier en plastique coulissant dans une glissiere 
situee egalement dans le coin gauche. 




Trou de 
protection 

tFERMfc) 



Pour ouvrir l'encocne de protection, faites glisser le levier vers le milieu du disque a l'aide d'une 
pointe de stylo ou d'un outil similaire. 



Deplacer le . 

levier vers le I % 

milieu do ' — •/ 
disque 





Trou de 
protection 

(OUVERT) 



Quelle que soit la mftftode employee pour ouvrir et fermer l'encocne, c'est toujours 1'ouverture 
qui permettra la protection centre recriture. 

IMPORTANT 

Assurez-vous toujours que tes encoches de protection de la disqeette CPM d'origine soient 
ouvertes. 
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Quand la disquette est dans le lecteur 

A 1'avant du lecteur de disquettes situe a la droite du 6128, vous trouverez on temoin hnmneux 
rouge et un bouton poussoir pour rejection. 
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Letemolnlumlneux 

D indique l'fitat de lecture ou d'ecriture des doonees sur le <fisqoe. 

Si un second lecteur est connects, le voyant de ce deuxieme lecteur sera allum6 en permanence, 
n ne s'e"teindra que lorsque le lecteur principal de roidinateur (lecteur A) sera en operation de 
lecture/ecriture sur le disque. 



Le bouton d'gjection 

Le fait d'appuyer sur ce bouton permet d'enfcver le disque du lecteur. 



S 
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Partie 4 : Informations prealables... 



Avwt de passer au chargement des logiciels et a la sauvegarde des programmes sur disquettes, 
i nous sur le clavier. Ceux d'entre vous qui sont familiarises avec les miCTO-ordinateurs 
t passer cettepartie. 

fw fanteor est sous tension et le message initial est afficb6 : voyons maintenant les fonctions 
ta difftrentes toucbes du clavier. 



t 



lm touches de deplacement du curseur <-T->i , situees eu haut et a droite du clavier permettem 
m ttre evoluer le curseur (petit bloc homogene) en differents points de l'ecran. 

Appoyez tour a tour sur cbaque toucbe de deplacement et observez les mouvements du curseur- 



RETURN 



Laawebe [RETURN] permet d'entrer les informations que vous venez de taper dans la memoire 
* ronfinateur.Vous devez appuyer sur cette louche apres chaque instruction tapee au clavier : 
me aonvelle ligne s'affiche alors aussitot a l'ecran. 

A aartir de maintenant, quand vous verrez le mot RETURN], cela signifiera que vous devez 
• sur la toucbe [RETURN! a la fin d'une instruction ou d'une ligne de commande. 



M 



Coin 



Crtapft»iP«0i 



^ 



CLR 



Cette Douche sert a cffaccr un caractere situe" sous le curseur. 

Tapez A BCDEFGH Le curseur est a droite du (H). Puis appuyez quatre fois «ir le curseur gauche 
<=. Le curseur se supeipose a la lettre E. Notez que la lettre E esttoujours visible sous le cursenr. 
Appuyez sur la touche [CLR] une fois et vous verrez que la lettre E a ttt effacee et que les lettres 
FGH se sont deplacees d'une case vers la gauche tandis que la lettre F se trouve sous le curseur. 
Appuyez sur la touche [CLR] sans la lacher. Les lettres F, puis G et H disparaissent 



t "\ 

ESC 









Cette touche permet de sortir d'une fonction que F ill i WW at en train d'executer, autrqi w M ^ 

ditd'interromrjremomeotaiieinentunprogran^ 

en appuyant encore une fois sur [ESC]. 

Appuyez maintenant deux fois de suite sur la touche [ESC]. L'ordinatenr est a nouveau prtt a 
accepter de nouvelles instructions. 

IMPORTANT 1 

Lorsque vous arrivez au bord droit de l'ecran en tapant plus de 40 caracteres sur une ligne, k 
caractere suivant apparattra antormtiquement sur une nouvelle ligne et a la gauche de 1'ecran. 
Cela signifie qu'il NE FAUT PAS presser [RETURN], a l'instar des habitues des machines a 
ecrire, qui tapeot RETOUR ou ENVOI a la fin d'une ligne. 

L'orchnateur s'en charge automatiquemeot et reagit a un [RETURN] non prtvu par un message 
d'erreur (habituellement Syntax ©nror) soit immddiatement, soil quand vous lancez rex&ution 
du programme. 
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Syntax error (ou erreur de syntaxe) gij 

Si le message Syntax error apparalt a 1'ecran, rordinateur vous dit qu'il oe comprend pat we 
des instructioos que vous avez tapees. Par exemple, si vous ftappez : 

printt [RETURN] 
le message suivant apparalt: ■■""-"* 

Syntax error 
Car rordinateur oe connatt pas la commande prfntt 
Si vous vous trompez dans une ligne de programme comme: 

10printt M abc" [RETURN] 
Le message Syntax error n'apparattra que lors de I'executioo du programme 
Tapez: 

Run [RETURN] 

Cene commande ordonne rexecutiou do programme que vous venez d'entrcr en memoire. 

Sw l'ecran, vous voyez : 

Syntax error in 10 
10prirrtt"abc" 

Cfe message vous iodique la ligne dans laqnefle se trouve l'erreur et vous presente la ligne du 

programme avec le curseur-editeur afin que vous puissiez corriger Terreur. 

Appoyez sur le curseur droit c jusqu'a ce que le curseur soit au-dessus du t de prlntt; pressez la 

rate [CLR] pour eulever le t superflu, puis pressez [RETU RN] pour introduire la ligne correcte 

dam rordinateur. 

Tapez: 

run [RETURN! 
.. . et vous verrez que l'ordinatenT a aoceptt l'mslroction.riafllcne: 

abc 
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Partie 5 : Chargement des logicieis 

et des jeux... 

Bienvenue a ceux d'entre vous qui abordent directement cette partie. 

Les jeux sur cartouche 

Comme nous 1'avons deja mentionne\ il est facile de lancer le Jeu de Demonstration livre" avec 
votre 464/6128 par simple pression de la touche [f2]. Si vous achetez des cartouches supplement 
taires, vous n'aurez mfime pas a le faire. Le jeu demarrera automatiquement des que I'ordinateur 
sera allume\ 

Chargement de logicieis sur disquettes (6128 uniquement) 

Chaquc disquette a normalement sa propre procedure de lancemeot Cependant, on vous deman- 
dera probablement de taper une commande comme : 

njn"disc" [RETURN] 

Apres les quelques secondes necessaires au chargement, votre jeu sera pret 

Si le programme ne se charge pas, regardez attentivement le moindre message d'erreur qui 
s'affichera sur Tecran afin de voir on vous avez commis une eneur. 

Drive A: disc missing 
Retry, Ignore or Cancel ? 

. . . signifie que vous n'avez pas inseie* la disquette correctement pu, si vous disposez d'une 
seconde unite 1 de disquette, que vous l'avez inseree dans runite" B: 

DISC . not found 

. . . indique que vous n'avez pas ioaSr* la bonne disqaette (on la bonne race) ou que vous avez fait 

une erreur en tapant le nom DISC. 

Bad command 

. . . signifie que vous avez mal tape" DISC en inserant un espace on un signe de ponctuation 

superflu. 
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Type mismatch 
. . . signifie que vous avez oublte les guillemets. 

Syntax error 
. . . vous avez fait une erreur en tapant run. 

Drive A: read fail 
Retry, Ignore or Cancel 

. signifie que l'ordinateur n'a pas reussi a lire les donnees de la disquette. Verifiez que vous 
avez inseie la bonne disquette et tapez R pour Retry (nouvel essai). Ce message apparalt si vous 
avez endommag6 la disquette en mettant le systeme sous ou hors tension sans la retirer. 
Lorsque vous saurez comment dupliquer une disquette, n'oubliez jamais de copier les programmes 
importants, notamment le CP/M. 

Chargement de loglciels i partlr de cassettes (464 uniquement) 

Chaque cassette de programme est nonnalement livree avec les instructions propres a son 
chargement. On vous demandera probablement de taper l'instruction suivante : 

run " [RETURN] 
n existe cependant un moyen plus simple qui requiert uniquement deux touches . 

1 Pressez la touche [CONTROL] et, en la maintenant enfoncee, appuyez sur [ENTER]. 

2 Relachez ces touches et appuyez sur [RETURN], 
Le message suivant s'affichera : 

Press PLAY then any key : 

La touche [PLAY] qu'on vous demande d'actionner est celle du lecteur de cassettes. Appuyez de 
telle sorte qu'eUe reste enfoncee. La phrase "Press any key" est couramment employee en 
informatique et peut vous induire en erreur. Hie permet de simplifier une sequence demandant au 
programme de passer a l'operation suivante en evitant de taper une instruction specifique. 

n serait plus correct de dire "pressez une touche - autre que les touches [SH I FT] [CAPS LOCK] 
[CRTL] [ESC] (ou toute autre touche du lecteur de cassettes)", mais tous les ordinateurs doivent 
faire certaines concessions dans un souci de simplicite. Partout ou vous rencontrerez le terme 
"press any key (appuyez sur une touche)" dans ce guide ou avec un programme que vous achetez, 
Mjmez-vous que les exceptions indiquees ci-dessus s'appliquent bien. 

Le fait d'appuyer sur la touche n'entratnera pas l'affichage de caracteres a l'ecran, die fera 
muoement demarrer le moteur du lecteur. S 'il ne demarre pas, appuyez sur une autre touche (une 
bonne habitude est d'utiliser la touche [ENTER]) et venfiez que la touche [PAUSE] n'ait pas 6te 
acddentellement enfoncee. 
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Sivous^plusd'unetoucbeja^chineva—erto^teauwsftappes^toi.qo-u.™ 

commence a charger le programme. 

***** que vous n'avez spfcffie aucuo nom de program partalier. Aussi longtemps ,»e 

rien ne viendra computer l'instruction 



4 



RUN" 

apparattra : ■ ■ w 

Loading GAMEPLAY 1 block 1 

^aTalise et affiche le numero du nouveau bloc en cours de lecture. 

iusqu'a ce qu'il se charge sans erreur. 
P„ure tt e S ur,»evo n eprogn« im e S uive zI e SnKS sag e8l! »i S -afflcbeo.etvo« e C P Csechar8ed U 



reste. 



Erreurs de lecture 

s™a g eReaderror»^ 

le 464 essayait de lire des donuees ou un programmej ur *«^ ™ *<Za* pas de les 

jnitialemeDttentede charger en vain, 
chance, cette fois sera la bonne. 

to touches [PLAY] ou [REC] et [PLAY] soul toujour* enfoncees. 
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illisibles. De plus, la bande est fortemeut rraintenue entre le galet et le cabestan. Cette situation, 
si elle est prolonge'e peut endommager la bande. 

Une autre eireur de lecture peut etre provoqu6e par le fait que le Iecteur est en position [PAUSE] 
lors d'une operation d'enregistrement ou de lecture. Une cassette peut avoir 6te" enregistree sur un 
autre 464 dont les tetes ne sont pas correctement alignees ce qui provoquera egalement une erreur. 

D'autres sont provoquees de temps en temps par des raisons purement arbitraires. La cassette peut 
ne pas etre a l'origine con?ue pour stocker des donnees inforraatiques, si bien qu'elle prdsente 
quelques imperfections qui la mettent en marge des cassettes, plus complexes et plus onereuses, 
r6servees a rinformatique. 

Malgrfe tout, la cassette s'est averee etre un excellent support pour le stockage et la restitution de 
donnees pour un codt tres peu eleve". La limitation des caractenstiques physiques, de la taille des 
particules magnetiques sur la surface de la bande, ainsi que la vitesse de deroulement fixent la 
limitation de la vitesse a laquelle les donnees seront transferees de la bande a r ordinateur. Essayer 
d'augmenter les performances originales de ce systeme au dela d'une certaine limite de tolerance 
pourrait provoquer des rtsultats douteux, particulierement pour les m6tbodes de duplication de 
masse utilisees pour la production en grand nombre de logiciels a coQt niduit 

REMARQUE : 

Les cassettes contenant des programmes qui proviennent d'autres types d'ordinateurs que le 464 
ne peuvent pas etre cbargees ou lues par celui-ci. Elles ont la meme apparence, produisent les 
memes sons criards quand elles sont lues sur des systemes audio, mais elles ne se chargeront pas. 
Toutefois, si vous en trouvez qui peuvent etre chargees et qui fonctionnent, nous vous serious 
reconnaissants de nous donner tous les details concernant le type de machine et le programme 
concerne. 
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Partie 6 : Passons a la programmation 



Jusqu'ici, nous avons vu ce qu'il faut faire et ne pas faire, comment installer l'ordinateur et 
connecter ses peiipbenques. Nous avons appris a charger les logiciels et a utiliser certaines touches 
du clavier. Nous allons maintenant apprendre & utiliser des instructions pour avancer un peu. 

Comme vous et moi, l'ordinateur ne comprend les instructions que dans la langue qu'il connalt 
Ce langage s'appelle le BASIC (abrgviation de Beginner's All-purpose Symbolic Instruction 
Code). Les mots du BASIC sont des "mots cles" assignant chacun une fonction particuliere a 
1'ordinateur. Comme tous les langages, BASIC obelt a des regies de grammaire. Dans ce cas precis, 
la grammaire s'appelle "Syntaxe" et 1 'ordinateur sera toujours assez gentil pour vous indiquer vos 
erreurs de syntaxe. 

Introduction aux mots c!6s du BASIC AMSTRAD 

Vous trouverez une description de la syntaxe du BASIC AMSTRAD dans le chapitre "Liste 
complete des mots cles du BASIC AMSTRAD". Pour 1'instant, nous allons aborder les 
commandes les plus courantes. 

CLS 

Pour effacer recran, tapez : 
CLS [RETURN] 

L'ecran s'efface et le mot Ready s'affiche suivi du curseur I, dans Tangle supeneur gauche de 

recran. 

Vous pouvez utiliser mdifferemment les MAJUSCULES ou les minuscules pour entrer un mot 
cl6 BASIC dans votre ordinateur. 

PRINT 

Sert chaque fois qu'il est neoessaire d 'afficher des caracteres, des mots ou des chiffies sur 1 'ecran. 
Si vous tapez 1'instruction suivante : 

print "bonjour" [RETURN] 

vous verrez apparartre : 

bonjour 

Les guillemets (" ") delimitent le mess^e que Ton desire voir apparaltre. Vous nanarquerez que 
bonjour est apparu a l'ecran aussitot que la touche (RETURN] a 6t6 frappee. Tapez : 

Cls [RETURN] 
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. . . pour effacer l'ecran. 

RUN 

L'exemple precedent montrait une instruction simple d'une seule ligne. L'instruction a 6t6 
executee des que vous avez appuy6 sur la touche [RETURN], puis a 6t6 oubliee. II est possible 
de stocker une serie destructions s'executant selon un ordre specifique, que l'on appelle un 
"programme". Les instructions qui composent un programme sont de meme type que celles que 
nous venons de voir, mais precedes d'un numCro de ligne. Les numeros de ligne d'un programme 
indiquent a l'ordinateur l'ordre d'execution des instructions. Lorsque vous appuyez sur [RE- 
TURN], la ligne est stockee dans la memoire jusqu'a ce que le programme soit execute. Tapez : 

10 print "bonjour" [RETURN] 

Vous remarquerez qu'apres avoir appuye" sur [RETURN], bonjour ne s'est pas affiche" a l'ecran. 
D s'est inscrit dans la memoire de l'ordinateur pour former un programme d'une ligne. Pour 
extorter ce programme, tapez : 

run [RETURN] 

Voos verrezalors bonjour s'afficnera recran. Remarquez qu'ala place de taper continoellement 
PRffT, vous pouvez utiliser le point d'interrogation : 

10 ? "bonjour" [RETURN] 

LIST 

Lorsqu'un programme a €\6 mis en memoire, on peut verifier ce qu'on a tape" en demandant la 
Ti$te" des instructions qu'U contient. Tapez : 

list [RETURN] 

Vow verrez a recran : 

10 print "bonjour" 

. . . qm est le programme contenu en memoire. 

fc— qui que le mot PRINT est a present en majuscules. Cela signifie qu'il a CtC reconnu en 
■* que mot cl6 du BASIC par l'ordinateur. 

Tape* els [RETURN] pour effacer l'ecran. Vouspourreznoterquesivotreprogrammen'apparalt 
ate 1 1'ecran apres cette instraction, il n'est pas efface" de la memoire pour autant 



ChapKrat 



I 



Faisons a nouveau [CONTROL] [SHIFT] et [ESC] pour rdinitiaUser l'ordinateur. Puis tapons le 
programme suivant : 

5 cis [RETURN] 

1 o input "Quel est ton nom";a$ [RETURN] 

20 input "Quel est ton age";b [RETURN] 

30 print "Je dois dire ";a$;" que tu ne fais pas tes ";b; ans. [RETURN] 

run [RETURN] 
Dans ce programme, nous avons utilise deux variables, a$ pour le nom et b pour l'age. Sur l'dcran 
on voit : 

Quel est ton nom ? 
Tapez votre nom (Fred) puis [RETURN]. 
La question suivante apparalt : 

Quel est ton age ? 
Tapez maintenant votre age (18 par exemple) puis [RETURN] 
si votre nom est Fred et que vous avez 18 ans, vous verrez s'afficher : 

Je dols dire Fred que tu ne fais pas tes 1 8 ans. 

Edlter un programme 

Si l'une des lienes du programme a ete tapee incorrectement, entrataant le message Syntax error 
ou un autre message d'erreur, U est possible de l'editer (autrement dit, de la modifier) sans avoir 
a la retaper. Supposons que le programme precedent ait e te mal tape 

5 clss [RETURN] 

1 input "Quel est to nom";a$ [RETURN] 

20 input "Quel est ton age";b [RETURN] 

30 print " Je dois dire";a$;" que tu ne fais pas tes ";b; H ans. [RETURN] 

run [RETURN] 

Trbis erreurs se sont glissees dans le programme ci-dessus : 

Dans la ligne 5, on a tape clss au lieu de els 
Dans la ligne 10, on a tape to au lieu de ton 
Dans la ligne 30, on a oublie l'espace entre dire et les guillemets ( ) 

H existe trois methodes pour editer un programme. La premifere consiste a retaper entierement la 
ligne. Quand eUe est retapde et entree en memoire, elle remplace celle qui portait le meme numero. 

U deuxieme roethode consiste a l'editer a l'aide du curseur. 

La demifere est appelee Copy Cursor, autrement dit Copie avec l'aide du Curseur. 
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M&hode d'&Iitlon I I'alde du curseur 

Pour corriger la hgne 5, tapcz 

edit 5 [RETURN] 

La Kgne 5 ipparatt sous la lignc 30, lc curseur plac6 sur 1c c de cl«8. 

Pour cnlcvcr lc s en trop dans clss, appuyez sur la touche curseur droite jusqu'a ce que cetui-ci 
soit sur le dernier s, puis appuyer sur la touche [CLRJ. Le s a disparu. 

Appuyez maintenant sur [RETURN], afro de corriger la ligne 5 dans la memoire. Tapez 
mainteoant: 

list [RETURN] 

pour verifier que la ligne 5 soit maintenant correcte. 
U commande AUTO, decrite plus loin, peut servir a edfter un nombre de lignes successives de 
h meme maniere que la mCtbode d'ddition a 1'aide du curseur. 

Mtthode par copie avec le curseur 

Le curseur de copie est un deuxieme curseur (en plus de celui d^ja present a l'ecran) qui s'afficbe 
lorsque vous appuyez sunultanementsur [SHIFT] et surl'une des touches du curseur. U se detacbe 
dn curseur principal et peut circuler sur l'ecran de maniere autonome. 

Pour corriger les fautes des lignes 10 et 30, mainteuez la touche [SHIFT] appuyee en pressant 
m k touche curseur T, jusqu'a ce que le curseur soitau debut de la ligne 10. Vous voyez que le 
evseur principal, en bas, n'a pas boug6. n y a maintenant deux curseurs a l'ecran. Puis pressez 
iv U touche [COPY] jusqu'a ce que le curseur soft place dans l'espace entre to et nom. La ligne 
10 est en train de se re-ecrire en meme temps sur la derniere ligne et le curseur principal 
s'immobilise a la meme place que le curseur de copie. Tapez la lettre n, qui apparatt sur la hgne 
do bas seulemenl 

Le curseur principal a bougd mais le curseur de copie est reste" a sa place. Maintenant, appuyez 
iv la touche [COPY] pour afficher la totalite de la ligne 10. Pressez [RETURN] afin que cette 
■qovelle ligne 10 soit mise en memoire. Le curseur de copie disparatt et le curseur principal se 
-i-~ a„ dessus de la ligne 10. Pour corriger la deuxieme faute, maintenez la touche [SHIFT] 
crfbncee et appuyez sur la touche curseur T pour faire apparaltre le curseur de copie au debut de 
la hgne 30. 

Appuyez sur [COPY] jusqu'a ce que le curseur de copie soft superpose aux guillemets suivant 
dtn. Appuyez une seule fois sur la barre d'espacemenL Un espace va s'introduire sur la ligne du 
tes. Coutinuez d 'appuyer sur la touche [COPY] jusqu'a ce que la hgne 30 soit copiee. Appuyez 
wm [RETURN]. 
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Afin de verifier si les corrections ont bien dte" enregistrees en memoire, vous pouvez demander la 
liste du programme en tapant : 

list [RETURN] 

REMARQUE : 

Pour deplacer rapidement le curseur (en cours d'ddition) a i'extrgmite' droite ou gaucbe d'une 
ligne, maintenez la touche [CONTROL] et appuyez sur une des touches flechees +~ ou ->. 

Effectuez la remise a zero avec les touches [CONTROLJ, [SHIFT] et [ESC]. 

IF 

Les commandes IF et THEN demandent a 1'ordiaateur de tester une condition specifiee et de 
proc6der k une execution en fonction du resultat du test. Par exemple dans rinstruction : 



if 1+1=2 then print "vrai" [RETURN] 

. . . rordinateur venfie la condition 1+1=2 et affiche "vrai" le cas echeant. 

Le mot cle" ELSE peut servir a indiquer ce que rordinateur doit faire si la condition IF THEN 
n'est pas remplie. 

if 1+1=2 then print "vrai" else print "'faux" [RETURN] 

Nous allons maintenant prolonger notre programme a 1'aide de la commande IF TH EN. 

Tapez le programme suivant, en remarquant que nous introduisons deux symboles nouveaux: 
< signifie moins grand que et se situe a cote" de la lettre M> signifie plus grand que, et se trouve 
a c6te" du signe < (moins grand que). 

5 els [RETURN] 

10 input "Quel est ton nom";a$ [RETURN] 

20 input "Quel est ton age";age [RETURN] 

30 it age <13 then 60 [RETURN] 

40 if age <20 then 70 [RETURN] 

50 if age >1 9 then 80 [RETURN] 

60 print "done ";a$;" tu n'es pas encore un adolescent avec tes ";age;" ans.": 

end [RETURN] 

70 print "done ";a$;" tu es un adolescent avec tes ";age;" ans.": end [RETURN] 

80 print "eh bien ";a$;" tu n'es done plus un adolescent avec tes ";age;" ans.": 

end [RETURN] 

Pour verifier que ce programme est correct, tapez : 

list [RETURN] 

. . . puis tapez : 



Page 30 Chapitre 1 Cours elementaire 



run [RETURN] 

Vous pouvez maintenant repondre aux questions de Poidinateur et observer ce qui se passe. 

Vous pouvez constater les effets du IF (si) et du THEN (alors) comme commandes dans un 
programme. Nous avions aussi rajoutd le mot END (fin) au bout des lignes 60 et 70. Ce motr6serv6 
END est utilise* pour mettre fin a un programme. S'il n'6tait pas la, le programme continuerait a 
jvancer et executerait aussi les lignes 70 et 80, 

_e mot EN D a la fin de la ligne 70 joue le meme idle. Les deux points avaot le mot END le s6parent 
Je 1* instruction precedente. Les : sont utilises pour separer des instructions pour permettre d'en 
mettre deux ou plusieurs sur une meme ligne. Nous avons aussi ajoute" la ligne 5 pour effacer 
. (Scran, comme il est preferable de le faire au d6but de chaque programme pour rendre les choses 
plus propres. 
Remettez la machine a zero en appuyant sur [CONTROL], [SHIFT] et [ESC]. 

FOR et NEXT 

Les commandes FOR et N EXT permettent de repdter un certain nombre de fois une action deTinie 
boucle). Le groupe d'instructions a rep^ter doit etre delimits par FOR et NEXT. 

"Tapez: 

5 els [RETURN] 

:0fora=l to 10 [RETURN] 

10 print "action numero ";a [RETURN] 

•Onext a [RETURN] 

run [RETURN] 

vous remarquerez que L'instruction a la fin de la ligne 20 a &e executee dix fois, comme le specifie 
.3 commande FOR de la ligne 10. Vous constatez egalement que la valeur de la variable esl 
■ncrementee de 1 a cbaque passage dans la boucle. 

Le mot cie STEP peut servir a deTinir le pas de la commande FOR NEXT. Par exemple, vous 

pouvez remplacer la ligne 10 par : 

for a=10 to 50 step 5 [RETURN] 
run [RETURN] 

• d us pouvez aussi fixer des pas negatifs : 

for a-100 to step -1 [RETURN] 
run [RETURN] 
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REM 

REM estl'abrfviation du mot anglais REMark. Cede instruction deinaude a l'ordinateurd'ignorer 
tout cc qui suit sur la ligne. REM peut ainsi servir a introduire des informations : le titte d'un 
programme ou 1' utilisation d'une variable par exemple : 

10 REM Pan sur tes envahisseurs [RETURN] 
20 V-5 :REM nombre de vies [RETURN] 

L' apostrophe (obtenue eD appuyant sur [SHIFT] et sur la touche 7) pcut remplacer REM : 

10 'Pan sur les envahisseurs [RETURN] 
20 V-5 'nombre de vies [RETURN] 

GOSUB 

Si un ensemble d' instructions doit etre execute" plusieurs fois, vous pouvez 6viter de les retaper a 
cfaaque fois que vous en avez besoin dans un programme. Elles peuvent 6tre transformees en 
sous-programme qui sera appele par la commande GOSUB suivie du numero de la hgne de depart 
de la routine. La fin de ce sous programme est indiquee par rinstruction RETURN. L'ordinateur 
passe aiors a rinstruction suivant immediatement la commande GOSUB qu'il vient d'ex6cuter. 

A litre d'exemple, voyons le programme suivant : 

10a-2 

20 PRINT "Votci la table de multiplication par ";a 

30FORb=1 TO 12 

40 c=a*b 

50PRINTa;'*x";b;"=";c 

60 NEXT 

70 PRINT 

80' 

90a=5 

100 PRINT "Void ia table de multiplication par ";a 

110 FOR b=1 TO 12 

120c=a*b 

130PRINTa;"x";b;"=";c 

140 NEXT 

150 PRINT 

160' 

170 a=8 

180 PRINT "Voici la table de multiplication par ";a 

190FORb=1 TO 12 

200 c=a*b 

210 PRINT a;"x";b;"~";c 

220 NEXT 

230 PRINT 

240' 
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250 a-9 

260 PRINT "Void la table de multiplication par ";a 

270 FOR b«1 TO 12 

280 oa*b 

290 PRINT a;"x";b;"«";c 

300 NEXT 

310 PRINT 



. .Vouspouvezremait}uerqu'unceminnombre(telignesreviennentplusieursfois,parexeniple 
:e passage contenu entre les lignes 260 et 3 10. Transformoos cette sequence en sous programme 
_-t ajoutoos a sa fin 1'instruction RETURN. Nous appellerons ce sous-programme, lorsque nous 
. oudrons 1'utiliser, par la commande GOSUB 260. Le programme deviendra alors : 



10a=2 

15 GOSUB 260 

80' 

90a=5 

95 GOSUB 260 

160' 

1 70 a=8 

175 GOSUB 260 

240' 

250 a=9 

255 GOSUB 260 

256 END 
257' 

260 PRINT "Voici la table de multiplication par ";a 

270FORb=1 TO 12 

280 c-a*b 

290PRINTa;"x";b;"=";c 

300 NEXT 

310 PRINT 

315 RETURN 



. 'us avous ainsi gagne" un temps precieux! Les sous programmes bien concus sont une partie 
-emielle dc la programmation. lis ddbouchent sur des programmes "structures" et sont un bon 
:::exe de programmation. 

orsque vous cr£ez des sous-programmes, rappelcz vous qu'il est possible d'avoir plusieurs points 
eotree. Par exemple, un sous programme occupant les lignes 500 a 800 pourra tres bien etre 
-orde au point 500 (GOSUB 500), 640 (GOSUB 640) ou 790 (GOSUB 790). 

• -tez rimportance de l'instruction END a la tigne 256. Sans elle, le programme continuerait a la 
:;ne 255 et executerait la ligne 260, qui ne doit 1'etre que par un GOSUB. 
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Arithm6tique simple 

Votrc ordinateur peut facilement vous servir de caleulatrice. 

Pour en assimiler les fonctions, nous vous proposons les exercices suivants. Dans cette section, 
nous emploierons le signe ? pour 6viter de taper print La rSponse sera affichee aussttot que la 
touche [RETURN] sera frappee. 

Addition 

(utilisez [SHIFT] et ; pour produire le signe +) 
Tapez: 

? 3+3 [RETURN] 

6 

(Remarquez que vous n'avez pas a taper le signe =) 

? 8+4 [RETURN] 

12 

Soustraction 

(utilisez = pour moins) 
Tapez: 

? 4-3 [RETURN] 
1 



Tapez: 



? 8-4 [RETURN] 

4 



Multiplication 

(Utilisez les touches [SHIFT] et : pour multiplier <* signifie x)) 

Tapez: 

? 3*3 [RETURN] 
9 



Tapez: 



? 8*4 [RETURN] 
32 
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Division 

(Utilisez / pour diviser sans appuyer sur [SHIFT). / signifie +) 



Tapez : 



? 3/3 [RETURN] 
1 



Tapez : 



? 8/4 [RETURN] 

2 



Division entire 

(Utilisez la barreX pour diviser avee suppression du reste) 
Tapez: 

? 10\6 [RETURN] 

1 



Tapez : 



?20\3 [RETURN] 
6 



Modulo 

( Utilisez MOD pour obteair le reste d'uae division entiere) 

Tapez : 

? 10 MOD 4 [RETURN] 
2 



Tapez : 



? 9 MOD 3 [RETURN] 




Racine carrSe 

Pour trouver la racine carre"e d'un nombre, utilisez sqr ( ). Le nombre dont on veut extraire la 
racine doit etire entre parentheses. 

Tapez : 
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sqr(16) [RETURN] (ceci veut dire Vl6) 
4 

Tapez: 

?sqr(1 00) [RETURN] 
10 

Puissances 

(Utilisez le signe t) 

Exemples de puissances : 3t2 (3 au cair6), 3t3 (3 au cube), etc. 

Tapez; 

? 3T3 [RETURN! (ceci veut dire 3 3 ) 
27 

Tapez: 

? 8t4 [RETURN] (ceci veut dire 8 4 ) 
4096 

Racines cubiques 

Vous pouvez facilemeot calculer les racines cubiques en adoptant la methode ci-dessus. 

Pour trouver la racine cubique de 27 (3 V 27) 

Tapez: 

? 27t(1/3) [RETURN] 

3 

Pour trouver la racine cubique de 125 
Tapez: 

?125T(1/3) [RETURN] 
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Calculs composes 

. cs calculs melangeant additioo, multiplication, etc, , soot compris par 1'ordinateur, raais il faut 
• iire attention a la priority des operateurs. 

j priorit6 va a la multiplication, suivie de la division, de l'addition et enfio de la soustraction. 

■?s priorites s'appliquent seulement aux calculs contenant ces quatre operations. 

-■it lecalcul : 

3+7-2*7/4 

:n pourrait penser qu'il se fait de la maniere suivante : 

3+7-2*7/4 
-8*7/4 
= 58/4 
= 14 

. j realite est pourtant ; 

3+7-2*7/4 
= 3 + 7-14/4 
-3 + 7-3.5 
= 10-3.5 
= 6.5 

? jut le constater, il suffit de le taper : 

? 3 + 7 - 2 * 7 / 4 [RETURN] 
6.5 
)o peut changer la maniere dont rordinateur calcule en ajoutant des parentheses, affectant la 
. norite aux operateurs qu'elles contiennent. Par exemple : 

? (3+7-2)-7/4 [RETURN] 
14 



>dre de priorite" de TOUS les operateurs mathematiques : 

Elevation a la puissance 
MOD Modulo 

Moins unaire (donne le n6gatif d 'un nombre) 
» et ./ Multiplication et division 

Division entieic 
. e t . Addition et soustraction 
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Encore des puissances 

Quand on veut se servir de tres grands on tres petits nombres dans les calculs, il est quelquefois 
utile de faire appel a la notation scientifique. La tettre E est utilisee en informatique pour les 
exposants de nombres en base 10. Vous fttes libre de taper E ou e, sans oublier que pour certains 
mathematician, e peut avoir un sens different dans les logarithmes neperiens. 

Ainsi, 300 est egal a 3 x 10 2 . en notation scientifique, on ecrit 3E2. De meme, 0.03 est egal a 
3 x 10' . On ecrit 3E-2. Essayez les exemples sirivants. 

Tapez : 



? 30* 10 [RETURN] 

300 



oubien: 



73EME1 {RETURN] 

300 

? 3000 • 1000 ...OU...? 3E3 * 1 E3 tRETURN] 
3000000 

? 3000 * 0.001 ...ou...? 3E3 * 1 E-3 tRETURN] 
3 



Partie 7 : Sauvegarde 



Maintenant que vous saveraplfr qmkpm tastructions, vous avez suremerit tres envie de savoir 
comment sauvegarder vos p rogra mm es. Si vous avez un 464, vous le ferez sur cassette. Sinon, si 
vous posse<lez un 61 28, vous le ferez sur disquette. Vous pourrez alors recharger vos programmes 
a chaque fois que vous en aurez envie. 

Mise a part la difference physique, il y a un certain nombre de differences d'utilisation entre une 
cassette et un disque. Une disquette ne peut pas etre utilisee directementcommeonleferaitavec 
unecassette. En premier lieu, elle doit etre fomjatfc.Nwisallonsarjciu^cesujet dam un instant 
Tandisqu'une disquette peut stockeretrecuperer automatiquementdes informations a toutendroit 
de sa surface, une cassette doit etre positionnee et rembobinee a la main. La machine se charge 
malgrf tout de faire d6marrer ou arreter la bande. 

n est 6galement tres important de nommer correctement les fichiers sauvegardes. Si les noms de 
ficliiers sur cassettes obdissent a des regies tres floues, ceux des disquettes doivent au contraire se 
conformer a des regies tres strictes decrites plus loin dans cechapitre. 

Si vous poss&tez un 464, allez a la section appelee "Sauvegarde des programmes sur une cassette". 
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Formatage des disquettes 

Avant d'ecrire des donnees sur une disquette vierge, il faut commencer par la fonnater, Lt 
fonnatage peut Stre vu comme la construction d'une sene d'£tageres dotees de compartimeotj 
pour le stockage des informations, en d'autresmots, une structure capable de stacker etderestitna 
des donnees. 

Le formatage partage chaque race de la disquette en 360 zones distinctes: 



Piste 39 




Bottler 



Piste 



Coin 4MnMnWbv 



Cfwpttml Pao»S8 



La disquette comporte 40 pistes, depuis la piste (exterieure) jusqu'a la piste 39 (ioterieure). 
Chaque piste se divise en 9 secteurs. 

Chaque secteur, quelle que soit la piste sur laquelle il se trouve, peut contenir 512 octets de 
donnees, soit 180 Koctets d'espace disponible sur chaque face de la disquette. 

Premieres Stapes pour ('utilisation des dlsquettes systeme CP/M 

Avant d'utiliser une disquette vierge pour l'ecriture et la lecture de vos programmes, vous aurez 
a la formater. Cela se fait a l'aide de la face 1 de la disquette systeme CP/M (fournie avec 
rordinateur). 

Allumez la machine et inserez la disquette systeme CP/M dans l'unite\ face 1 vers le haut 

Tapez: 

|cpm [RETURN] 

(La barre verticale s'obtient en maintenant la toucbe [SHIFT] enfoncee et en appuyant sur @). 

Apres quelques secoudes, le message suivant apparalt sur I'ecran : 

CP/M Plus for the 6128. (c)1985 Amstrad pic 

Cette "signature" indique que rordinateur est maintenant sous contrble du systeme d'exploitation 
CP/M Plus. Vous verrez egakmcnt le symbole A ainsi que le curseur s'afficher a Pecran. Ceci est 
une invite systeme, {comparable a READY sous BASIC) qui indique que 1'ordinateur attend vos 
instructions. 

Une fois que vous etes sous CP/M , vous ne pouvez pas entrer de commandes BASIC. La machine 
ne les comprendra plus. 

Si vous tapez par exemple la commande BASIC : 
CIS [RETURN] 

. . . 1'ordinateur re"pond en r6p6tant le mot ineompris, suivi d'un point d' interrogation : 
CLS? 

. . . montrant ainsi qu'il ne comprend pas votre commanae. 



Abordons maintenant quelques commandes de CP/M. Tapez : 
dir [RETURN] 
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Vous aliez voir apparaltre le catalogue des COMmandes et urilitaires du CP/M. L'un d'eux est 
DISC KIT. Tapez : 

disckit [RETURN] 

\u boutde quelques secondes, le message initial de DISC KIT s'afficbe en naut de l'ecran suivi 

Je: 

One drive found 

:ndiquant que vous exploitez Tutaitaire DISC KIT et que l'ordinateur a reconnu l'utilisation du 
<ysteme avec une seule unite de disquettes (celle qui est integree a rordinateur). 
Si votre systeme comprend une unite supplementaire, le message affkhd sera : 

Two drives found 
Vous verrez alors au bas de l^cran : 



Copy 

Format 

Verify 

Exit from program 



1 sagit du menu principal de DISC KIT. Les numeros inscrits dans cette case correspondent aux 
■.ouches de fonction situees a droite du clavier (fO, fl , f4 et f7). Faites votre selection a l'aide de 
a touche voulue. 

\ppuyer sur la touche de fonction fO, a ce stade des operations, vous fait sortir du programme 
:)ISC KIT pour vous ramener sous le systeme CP/M (message A. 

:*nsque nous voulons formater une disquette, appuyons sur f4. 



7 




4 


1 






ATTENTION 

LE FORMATAGE D'UNE DISQUETTE DEJA ENREGISTREE ENTRAINERA 
L'EFFACEMENT DE SON CONTENU. 
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9 


6 


3 





Un nouveau menu apparalt alors vous proposant plusieurs formats 

System format 
Data format 
Vendor format 
Exit menu 



Comme prec^demment, vous allez appuyer sux une des touches de fonctions (f3, f6 ou f9) pour 
861601100061 le type de format souhaite". Nous reviendrons par la suite sur ces differents formats; 
pour le moment, choisissons le format Data, soit la touche f6. 

Appuyer sur la touche ., situee sous f3, f6 et f9, vous fait sortir du mode Format pour vous ramener 
au menu DISC KIT. 

Apres selection de la touche de fonction 6 (en supposant que votre systeme ne possede qu'une 
seule unite de disquette), vous recevez a I'eeran le message : 



Format as Data 

Any other key to exit menu 



Vous devez alors retirer la disquette CP/M et insurer la disquette concernee, la face a formater 
toumee vers le hauL 

Tapez Y (pour "oui", a savoir, "poursuivre et formater la disquette"). 

Le formatage de la disquette s'effectue piste par piste (de a 39), et le num6ro de la piste en cours 
de formatage s'affiche dans Tangle sup&ieur gauche de Fecran. 

Vous ne pouvez pas formater une disquette dont le trou de protection en ecriture est ouvert. Si 
vous tentez de le faire, le message suivant vous est retourne" : 

Disc write-protected 
Insert disc to format 
R-etry or Oancel 

. . . Tapez alors C pour annuler. Retirez la disquette et inserez une disquette correcte pour le 
formatage (dont le trou de protection est ouvert). 
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.-I llw j k MMA3S fcmET k troy * proteltai en torture iJ ubp ilttqntnie dual torn tauluilex 
Kiw le cnutara. C"«l nocamnwol; k co pour l« rfi^ijwne? jytitme CFVM. 

: foil le fQrmtuagff itnvuot, I "ordtnaieur vcos. dtmtfiite dc miner la dfcquUlt ef d'Jf?fiiiycr >ur 

- roucne quekowruE du clavier pour pwrsuivrc, 

rCaqiKri, v«b pouw* msdrt* uw autre dHqadfc A fintriHter ct aprjiiyeif Atoftiveau tui Y. Vow 
:f I a |MBtm'lil£ iJc rcptttT edit opfifalion airtairi dc tow ifoc w«^ le vnulez. 

■ifx fenraiafce dc Make* trtj di*i|ucllfJ. JW^i** tujr 1Ufce rwkbc if-jelcooqw 1 (1 1 VsL-qpium iic 

- it be V) paiu rtvenir iu nxau pfiAtipaJ da DISC KIT. 

j> abuMJeroos fcs options Copy cl Verify urleneuianenl. Pour I'bcuie, i£uiQtftj*it que vmjj 
■ w fdmutef Sow CP/M, AOwLaJtan* femitialiffii l'«diail£wll ai{fcdcftaudl«(OOflTflOLJ, 
SHIFTlttfESCJ. 

iPJc loujourt vat cap* at vas. diftpnui CP*M a iina iQr car cUes hoc* ta cfee dc vuflic tic 
re lydfcn* Ntiax vrtit modcnraiu pu la iuist ccoigjebl faire use €4JfH« dc travail dc eci 
-.-, nines dreqoenes <te ftf<Ht i pevurir b» meire dc cfiie HrffanucmcM 

-ormaiage de$ disquettes dans un syst&me & deux unites. 

nci tes innmcticirw ci-dtsniT. xelccciiwDci I'cjpfkni Format thi menu pnncrrul du DISC KIT 
ifjiuyaiM air la louche 14, pu is seksnoniKT la touche D*t8 iotmafl au iim j-m dc Id il*»cIk 16. 
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format A: 
Format B: 
Exn menu 



3 
5 
2 



-<lectn>n dc L r opi>&fl Formal: 6 411m. lie 16), vom pcnwirra dc Lulwct vMrr disindie wsifcirJE 
; c rianitd A (lacy I vers le liairt J; VU8* pi au:rcz d<n* la daquCLle 5 foniuter dim I'miU* D 

ipCjC aJhw* Y pmur pnnblei aii ronnatagi!. ow «u iitt auBc liiutbc pout rctctilf au mciw pn ncijal 
DISC KIT 
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Si vous avez selectionne 1' option Format A (touche f8), vous DEVEZ retirer la disquette systeme 
cte 1 'unite" A et la remplacer par la disquette a formater. 

N'OUBLIEZ JAMAIS DE PROTEGER LES DISQUETTES SYSTEME CONTRE UN ECRA- 
SEMENT ACCIDENTEL DES DONNEES QU'ELLES CONTIENNENT. 

Maintenant que nous avons formate une disquette vierge (ou deux), nous pouvons commeneer a 
experimenter les commandes de gestion de disquettes propres au BASIC. 

Sauvegarde d'un programme sur disquette 

Vous avez tape un programme dans la mdmoirc de 1'ordinateur. Vous voulez le sauvegarder sur 
disquette. Tapez : 

save ,, nomfich ,, [RETURN] 

N'oubliez pas qu'il est obligatoire de donner un nom a un fichier. 

Un nom de ficbier sur disquette se compose de deux parties ou zones. La premiere, obligatoire, 
petit contenir jusqu'a 8 caracteres, lettres ou nombres. Les espaees et signes de fluctuation sont 
interdits. Cette premiere zone contient le nom du programme. 

La deuxieme zone, facultative, peut contenir jusqu'a 3 caracteres. Cette fois encore, les espaees 
et les signes de ponctuation sont interdits. Ces deux champs sont separes par un point (.). 

En 1' absence de specification du nom de la deuxieme zone, le systeme choisit par dCfaut .BAS 
pour les fichiers BASIC et .BIN pour les fichiers binaires (en code machine), 

Comme exemple de sauvegarde sur disquette, ecrivez un petit programme dans la mernoire de 
rordinateur, inserez une disquette formatee puis tapez: 

save "exemple" [RETURN] 

Apres quelques secondes, le message Ready apparalt a I'ecran. Le programme est maintenant 
sauvegarde sur la disquette. (Dans le cas contraire, verifiez ce que dit le message d'erreur affiche" 
a I'ecran. La disquette peut ne pas avoir 6t6 inseree dans la bonne unite ou le trou de protection 
en ecrirure peut 6tre ouvert. La commande peut aussi avoir 6te mal ecrite.) 

Catalogue 

Apres la sauvegarde du programme precedent, tapez : 

cat [RETURN] 
Vous verrez apparattre : 

Drive A: user 

EXEMPLE.BAS 1K 

177Kfree 



Page 44 Chapitre 1 Cours elementaire 



nom du fichier sera afficbi avec ses deux zones, la deuxieme ayant 6t6 specifiee ou non^insi 
nche. 

Chargement d'un programme d partir d'une disquette 

« programmes sur peuvent etre charges a partir d'une disquette a l'aide des commandes : 

load "nomfich" [RETURN] 
run [RETURN] 

■ hi pour un d6marrage imm6diat : 
run "nomfich" [RETURN] 
. tezau passage querun est la seulecommandepermettautd^executerdes programmes prot£g6s. 

Sauvegarder un fichier sur une cassette 

■, -res avoir tape uq programme sur l'ordinateur, vous pouvez le sauvegarder en tapant : 

save "nomfich" [RETURN] 
•nomde fichier" peutetrc une combinaisondel6caracteresincluantlesespaces. Si vous tentez 
. ■ L 3per un nom plus long, tout caractere a partir du 1 /erne sera detruit. 
ordinateur renverra le message suivant : 

Press REC and PLAY then any key : 
uvenez-vousbiendu sens des mots "any key'Melecteurde cassettes vademarreret l'ordinateur 
. -. sauvegarder le programme avec sous le nom indique\ 

IMPORTANT 

ordinateur ne peut pas encore savoir si vous avez appuy* sur les bonnes touches sur le jectet*. 
.^sWousenfonce^ 
.mblera etre sauvegarde" alors qu'il ne le sera pas. 

\TTENTION : 

,ous appuyez accidentellement sur REC et PLAY alors que vous desirez charger ou lire un 
--ramme conteuu sur la bande, vous effacerez un des programmes de la cassette. Si vou 

•Tterrompez pas le processus par 1'appui de la louche [ESC], la cassette se deroulera jusqu an 
. t et tout sera effaced Pour eviter ce type d'accident avec les donnees que vous ne voulez pas 
..-rdre. enlevez les pattes de protection avant d'avoir appris cette lecon a vos d6pens. 
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Les fichiers ASCII 

save "nomfich",a [RETURN] 

L'ajout du suffixe ,a pennet a 1' ordinateur de sauver des programmes ou des donnees sous forme 
de fichiers texte ASCII. Cette methode de sauvegarde s'applique aux fichiers de traitement de 
textes ou aux autres applications. Son emploi sera exptique plus loin. 

Les fichiers proteges 

save "nomfich",p [RETURN] 

Le suffixe ,p indique a l'ordinateur de proteger les donnees de telle sorte que le programme ne 
peut pas etre listC apres son chargement ou si, apres son lancement, son execution est stoppee par 
l'appui sur [ESC]. 
Les programmes sauves de cette facon peuvent uniquement etre lances par les commandes : 

run "nomlich" [RETURN] 

... ou 

chain "nomfich" [RETURN] 

Si vous prevoyez d'editer ou de modifier le programme, alors gardez-en une copie sous une forme 
non protegee (saos le suffixe ,p) 

Fichiers binaires 

save "nomfich",b, <adresse de depart>,<nombre d'octets> 
[,<point d'entree eventuel>] [RETURN] 

Cette option permet d'effectuer une sauvegarde binaire qui provoque le stockage de blocs entiers 
de donnees de la RAM sur la disquette, tels qu'ils apparaissent dans la memoire. D est necessaire 
dans ce cas d'indiquer a l'ordinateur le d6but de la zone memoire a sauvegarder, sa longueur et, 
s'il s'agit d'un programme, 1'adresse memoire a partir de laquelle le fichier doit s'executer. 
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7idaged'6cran 

rne sanvegarde binaire permet de stocker directement sur disquette les donnees de la memoire 
. Tin sous forme d'un vidage d'6cran. Le contenu de l'ecran est alors sauvegarde" tel qu *il apparait 
' jfficbage a l'aide de la commande : 

save "pagecran" ,b,491 52,1 6384 [RETURN] 

■ u 491 52 est 1'adresse de d6pait de la m6moire ecran et 1 6384 indique la longueur de memoire 
-^i que vous voulez sauvegarder. 

;r rappeler ces donne"es a l'ecran, tapez : 
load "pagecran" [RETURN] 

3opie de programmes de disquette £ disquette 

mlisant les commandes deja apprises dans cette section, vous constaterez que Ton peut copier 
programme de disquette a disquette ou de cassette a cassette en chargeant simplement le 

- cramme en memoire a partir de la disquette ou cassette d'origine (source). II ne reste plus 
• ■:ite qu'a retirer la disquette et a en introduire une autre (destination) pour y sauver le 

■ gramme. 

-. plus amples informations sur ces sauvegardes entres disquettes ou cassettes seront donnees 
- loin dans ce manuel. 



Partie 8 : Modes couleurs et graphiques 



rdinateur personnel Amstrad 464/6128 dispose de trois modes d'affichage a l'ecran : Mode 0, 
■Je 1 et Mode 2. 

,: mise sous tension, 1'ordinateur est automatiquement en Mode 1 . 

.: comprendre les differents modes, appuyez, apres la mise en route, sur la touche numenque 
•'. j.mtenez-la enfoncee jusqu'a obtenir deux lignes pleines de 1. Si vous comptez le nombre de 
Menu sur une ligne, vous verrez qu'il y en a 40 : en mode I , il y a 40 colonnes. Appuyez sur 
ETURN], vous aurez le message "Syntax error". Ne vous inquietez pas, nous avons simple- 
.: pris le plus court chemin pour revenir au message Ready. 

•:/ maintenant : 

mode [RETURN] 

.^ \oyez que les caracteres sur l'ecran sont plus Iarges. Appuyez sur le chiffre 1 de fa?on a 
;-r.ir deux lignes de 1. Vous en decomptez 20 par ligne. Dya done 20 colonnes en mode 0. 
:-.;vez sur [RETURN] de nouveau. 
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Comme nous le elisions auparavant, 1* ordinateur est eo mode 1 a r origine. Pour y revenir a partir 
d'un autre mode, tapez : 

mode 1 [RETURN] 

Configuration de P6cran 



. PEN 




BORDER est le cadre entourant la zone d'ecriture ou P APE R. (Au depart, BORDER et p APE R 
sont bleus tous les deux). Les caracteres affiches apparaissent toujours a 1 mteneur du cadre 
PAPER designe le fond sur lequel Us s'affichent Le stylo (PEN) ecrit les caracteres en couleur. 
Nous allons maintenant aborder la selection des couleiirs affichees a l'ecran et la facon de les 
modifier. 

A la raise sous tension ou lors d'une ^initialisation, le cadre est toujours de la couleur num6rc > 1 
^consultant le tableau 1, vous constaterez que e'est la couleur bleue ^ "*^5"*" 
du cadre, utilisez la commande BORDER suivie du numero de la couleur sdlecUonnee: Pour un 
cadre blanc, tapez : 

border 13 [RETURN] 
Pour l'instant, pas de problfeme. Compliquons un peu l'exercice... 

A la mise sous tension ou a la reinitialisation, les numeros PAPER et PEN sont automatiquement 
selection's : PAPER = 0, PEN = 1 . Mais ceci NE VEUT PAS dire pour autant que les couleurs 
du papier et du stylo sont celles du tableau 1 ... 

En effet, PAPER = et PEN = 1 ne sont pas des parametres de couleur. Imaginez que vous 
disposiez de 4 stylos numerates de a 3 et que, pour chacun d'entre eux vous ^ te J*™^ 
27 couleurs d'encre, numerotees de a 26. Vous voyez done que le stylo numero 1 peut prendre 
plusieurs couleurs. Libre a vous, bien entendu, de choisir la meme couleur d encre pour les 4 
stylos. 
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:si ce qui se passe avec I'ordinateur. A l'aide des commandes [PEN] et INK, vous pouvez 
.xUODQer le stylo qui vous int6resse et sa couleur d'encre. 

. ous rappelant que vous operez en Mode 1 (40 colonnes), consultez le tableau 2 ci-dessous et 
: ; verrez dans la premiere et la troisieme colonne que le stylo numero 1 correspond a la couleur 
r.ero 24. Si vous vous reportez au tableau 1, vous constaterez que la couleur num6ro 24 est le 
:■: vif. C'est effecuvement la couleur affichee lors de la mise sous tension. 

luleurs par d^faut 



e Papier/stylo 


ModeO 
Couleur d'encre 


Model 
Couleur d'encre 


Mode 2 
Couleur d'encre 







1 




1 




1 


I 




24 




24 




24 


2 




20 




20 




1 


3 




6 




6 




24 


4 




26 




1 




1 


5 









24 




24 


6 




2 




20 




1 


7 




8 




6 




24 


8 




10 




1 




1 


9 




12 




24 




24 


10 




14 




20 




1 


11 




16 




6 




24 


12 




18 




1 




1 


13 




22 




24 




24 


14 


clignotement 1,24 




20 




1 


15 


clignotement 16,1 1 




6 




24 



Tableau 2 : Reference PAPER/PEN/MODE/INK 
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~a « n ^« pa pfr/PEN/IN K indiquees au tableau 2 ne sont pas fixes. Ba 

sir— "^^^ 

de la couleur d'encre. Uoe virgule separe ces deux parametres. 

Sachant que le stylo 1 est selectionne, nous allous ehanger sa couleur d'encre pour obtemr des 

caracteres oranges. 

Tapez: 

ink 1,15 [RETURN] 
Les caracteres afficbes ont effectivement change de couleur. 

BssssrsssssKsasssssss 

verte (numero 9). Tapons : 

ink 0,9 [RETURN] 
Changeons maintenant de stylo. Entrons : 

pen 3 [RETURN] 

2). Passons a la couleur rose en tapant : 

ink 3,16 [RETURN] 
3 est le parametre S 61ectionn6 preeminent par la commande : pen 3, et 16 correspond a la 
couleur d'encre rose. 

apres 1'execution de cette commande. Tapez : 

paper 2 [RETURN] 
Cette fois encore, vdrifiez sur les tableaux 1 et 2 que le numero 2 de PAPER correspond a un 
bleu turquoise vif. Colorez-le en noir en tapant : 

ink 2,0 [RETURN] 
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L'ecran afficbe maintenant les caracteres ecrits avec les stylos 1 et 3 sur des fonds et 2. Vous 
pouvez selectionner des couleuis INK de stylo et papier que vous n'Stes pas eo train d'utiliser. 
Tapez par exemple : 

ink 1,2 [RETURN] 

Les caracteres deja tap6s avec le stylo 1 changent de couleur. 
Tapez: 

els [RETURN] 

. . . pour effaeer l'ecran. 

Vous devez etre a meme desormais de revenir aux couleurs d'origine (cadre et fond bleus, 
caracteres jaune vif) a l'aide des coramaades BORDER, PAPER, PEN et INK. Essayez. Si vous 
n'y parvenezpas, reinitialisez l'ordinateur a l'aide des touches [CONTROL], [SHIFT] et [E£C]. 

Couleurs clignotantes (Flash) 

On peut faire alteraer les caracteres d'une couleur a 1'autre en utilisant un numero different pour 
la definition INK de la commande PEN. 

La couleur des caracteres va changer rapidement entre le blanc brillant et le rouge vif. Rginitialisez 
a l'aide des touches [CONTROL], [SHIFT] et [ESC] et tapez : 

ink 1,26,6 [RETURN] 

ftans ce cas precis, 1 correspond au numero de stylo ([PEN]), 26 au blanc brillant et 6 a la couleur 
qu'il va prendre, en roccunence rouge vif. 

:! est egalement possible de faire clignoter le fond [PAPER] d'une couleur a 1'autre. Vous devez 
dors ajouter la commande INK un numero de couleur supplementaire. 

D our faire clignoter [PAPER] entre vert et jaune vif, tapez : 

ink 0,9,24 

D correspond au numdro du papier, 9 au vert et 24 au jaune vif. 

-^initialisez a l'aide des touches [CONTROL], [SHIFT] et [ESC]. 

..o tableau 2 vous montre qu'en mode 0, deux des numeros de [PEN] (14 et 15) ou de [PAPER] 
. 4 et 15) representent les couleurs clignotantes d'origine. Autrement dit, les commandes INK 
:t et£ preprogrammees avec un parametre de couleur supplementaire. 

-: le constate en faisant : 

mode [RETURN] 
pen 15 [RETURN] 

.: l'ecran vous verrez le mot Ready alteraer entre bleu ciel et rose. 
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Maintenant, tapez : 

paper 14 [RETURN] 
Cts [RETURN] 

Outre Ready clignotant entre bleu ciel et rose, le fond de [PAPER] alterae maintenant entre 

jaune et bleu. 

Les numeros de stylo et papier 1 4 et 15 peuvent etre reprogrammees par la commande INK pour 

obtenir d'autres couleurs intermittentes ou une couleur fixe. 

Enfin, on pent faire clignoter la couleur du cadre en ajoutant un autre num6ro de couleur a la 

commande [BORDER]. 

Par exemple : 

border 6,9 [RETURN] 

La couleur du cadre alterae entre jaune vif et vert. Pour le cadre, vous avez le choix entre une ou 

deux couleurs parmi les 27 disponibles, quel que soit le mode de fonctionnement 0, 1 ou z. 

Reinitialisez 1'ordinateur a l'aide des touches [CONTROL], [SHIFT] et [ESC]. 

Pour de plus amples informations sur les couleurs disponibles, tapez ie programme suivant et 

lancez-le. 

1 MODE [RETURN] 

20 vitesse=600:REM determine la vrtesse du programme [RETURN] 

30 FOR b°0 TO 26 [RETURN] 

40 LOCATE 1,12 [RETURN] 

50 BORDER b [RETURN] 

60 PRINT "Couleur du cadre ";b [RETURN] 

70 FOR t-1 TO vitesse [RETURN] 

80 N EXT t,b [RETURN] 

90 CLG [RETURN] 

1 00 FOR p-0 TO 1 5 [RETURN] 

110 PAPER p [RETURN] 

120 PRINT "Papier ";p [RETURN] 

130 FOR n=0 TO 15 [RETURN] 

140 PEN n [RETURN] 

150 PRINT "Stylo ";n [RETURN] 

160 NEXT n [RETURN] 

170 FOR t=1 to vitesse-2 [RETURN] 

180 N EXT t,p [RETURN] 

190 MODE 1 [RETURN] 

200 BORDER 1 [RETURN] 

210 PAPER [RETURN] 

220 PEN 1 [RETURN] 

230 INK 0,1 [RETURN] 

240 INK 1,24 [RETURN] 

run [RETURN] 
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IMPORTANT 

:\ms ce programme, comme dans les chapitres suivants et dans les listings de ce manuel, les 
mots cl6s BASIC apparaissent en majuscules. lis s'affichent ainsi sur la demande d'une 
instruction LIST. II est g6n6ralemnt preT&able de taper les instructions et les programmes en 
minuscules pour mieux detecter les erreurs de frappe lors des listages des programmes (les 
mots cl6s mal ortiiographi6s ne seront alors pas converts en majuscules). 

.usqu'a la fin de ce cours elementaire, les programmes sont listds en majuscules et en 
minuscules afin de vous familiariser avec ce proc6d6. 

n nom de variable, x ou $ par exemple, ne sera pas converti en majuscules lors du LISTage 
!u programme, bieo qu'il soit, de toute facon, reconnu par le programme. 



Attention 

\ partir de maintenant, nous ne vous preciserons plus de taper [RETURN] a la fm de chaque 
:igne. Nous supposons que vous en avez pris le nfflexe. 
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Graphlques 

n y a un certain nombre de caracteres dans la memoire de Fordinateur. Pour afficber Tim de as 
caracteres, on utilise le mot reserv6 : 

chr${) 

Entre les parentheses, on insere le numero correspondant au caractere. n doit 6tre corapris entre 
32et255. 

Faites [CONTROL], [SHIFT] et [ESC] pour la remise a zero, puis tapez : 

print chr$(250) 

N*oubliez pas d'appuyer sur [RETURN]. Le caractere N*250, icpresentant un honane marcbant 
vers la droite. 

Pour afficber tous les caracteres et symboles ainsi que leur numero, tapez le programme suivant 
en n'oubliant pas d'appuyer sur [RETURN] apres cbaque ligne. 

10FORn-32TO255 
20 PRINT n;CHR$(n); 
30 NEXT n 
run 

Vous trouverez au cbapitre "Pour information..." tous les caracteres accompagnes de leurs 
numdros respectifs. 

LOCATE 

Cette commaode sert a placer le curseur a un endrott precis de recran. Sans la cmmmufV 
LOCATE, le curseur se trouve en haut et a gauche de recran, ce qui correspond a dormer aux 
coordonnees x et y les valeurs 1 et 1 (x 6tant la position horizontale et y la position verticale). Bn 
model,ilya40colonneset25 Ugnes. Pour placer un caractere en haut etau milieu del' ecran , 
il faut indiquer x=20 et y-1 . Essayons : 

mode 1 ...recran s 'efface. Le curseur se trouve en haut a gauche. 

10 LOCATE 20,1 

20 PRINT CHR$(250) 

run 

Pour verifier qu'il s'agit bien du haut de recran, tapez : 

border 

Le cadre sera noir et vous verrez le petit bonbomme au milieu de la ligne supeneure. 
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En mode 0, il n'y a que 20 coloones, mais toujours 25 lignes. Si vous tapez : 

mode 
run 

. . . le bonhomme apparalt en baut et a droite de 1 'eoan, la 20eme colonne erant la derniere du 
modeO. 

En mode 2, il y a 80 colonnes et 25 lignes. A 1'aide du meme programme, vous devinerez 
certainement ou va apparaltre le petit bonhomme. Tapez : 

mode 2 
run 

reveoez au mode 1 en fidsant : 

model 

A vous maintenant de faire varier les nombres apies locate et dans CHR$( ). Pour Fexemple, 
essayez: 

locate 20,1 2 print chr$(240) 
Vous voyez une fieche au centre de l'ecran. Dans cette instruction : 

20 est la coordonnee horizontal (comprise entre 1 et 40) 

12 est la coordonnee verticale (comprise entre 1 et 25) 

240 est le numero du caractere (compris entre 32 et 255) 

Pour voir le caractere 250 repute" sur Pecran, il suffit de taper : 

10CLS 

20 FOR X-1 TO 39 

30 LOCATE X.20 

50 PRINT CHR$(250) 

60 NEXT X 

70 GOTO 10 

run 

Faites [ESC1 deux fois pour interrompre le deroulement 

Pour effacer le caractere precedent avant d'imprimer le suivant, bq>ez : 

50 PRINT " ";CHR${250) 

(La nouvelle ligne 50 remplace automatiquement la precddente). 
Maintenant, tapez : 
run 
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FRAME 

Pour que le mouvement du caractere soit plus joli, ajoutez la ligne suivante : 
40 FRAME 

La commande FRAME synchronise le mouvement de l'objet afficW sur la frequence de balayage 
de la trame d'affichage. Si cette notion vous paratt trop technique, rappelez-vous simplement que 
cette commande sert a deplacer harmonieusement sur l'ecran des caracteres ou des graphiques. 

On peut encore ameliorer ce programme en ajoutant des petites pauses et en utilisant d'autres 

caracteres. 

Pour ce faire, tapez : 

list 

Puis ajoutez les lignes suivantes au programme : 

70 FOR n=1 TO 300: NEXT n 

80 FOR x-39 TO 1 STEP -1 

90 LOCATE x,20 

100 FRAME 

110 PRINT CHR$(251); ,,rt 

120 NEXT x 

130 FOR n-1 TO 300:NEXT n ' s ,- 

140 GOTO 20 

run 

PLOT 

Contrairernent a la commande LOCATE, PLOT sert a fixer la position du curseur graphique, 
utilisant les coordonnees des pixels (un pixel etant la plus petite unite d'affichage l'ecran). 

Remarque : le curseur graphique, different du curseur texte, n'est pas visible. 

II y a 640 pixels horizontaux sur 400 verticaux. Les coordonnees x,y sont definies par rapport au 
coin inferieur gauche de l'ecran, qui a pour coordonnees 0,0. Contrairement a la commande 
LOCATE, qui s'applique aux caracteres, ces coordonnees sont les memes en mode 0, 1 ou 2. 
L'ordinateur ayant et6 remis a zero a 1'aide de [CONTROL], [SHIFT] et [ESC], essayez : 
plot 320,200 

Un petit point apparaft au centre de l'ecran. 
Changeons de mode en tapant : 

modeO 
plot 320,200 

Le point se trouve toujours au milieu de l'ecran, mais il est agrandL Changez a nouvean de mode 
et tapez la mfime commande pour voir le resultat en mode 2 : 
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mode 2 
plot 320,200 

Le point est toujours au centre mais il est beaucoup plus petit 

Bisayez de dessiner des points sur Pecran avec les differents modes pour vous habituer a la 

commande PLOT. Revenez ensuite en mode 1 et videz l'ecran en tapanL 

model 

DRAW 

Remise a zero : [CONTROL], tSHIFT] et [ESC]. La commande DRAW dessine une ligne a 
partir de la position du curseur graphique. Pour mieux comprendre, dessinons un rectangle sur 
l'ecran avec le programme suivant 

Oo commence par placer le curseur graphique avec la commande PLOT. Puis on dessine une 
ligne a partir de ce point, vers le point superieur gaucbe, puis vers la droite, etc... 

Tapez: 

5CLS 

10 PLOT 10,10 

20 DRAW 10,390 

30 DRAW 630,390 

40 DRAW 630,10 

50 DRAW 10,10 -.,--- 

60 GOTO 60 

run 

Actionnez [ESC] denx fois pour sortir du programme. 

Dans ce programme, l'ordinateur boucle internment a la ligne 60 jusqu'a ce que vous 
interrompiez en appuyant deux fois sur la touche [ESC]. Ce type d'instruction 6vite l'lnterrup- 

iod automatique du programme apres la derniere ligne et raffichage du message ready). 

Ajoutez maintenant les lignes suivantes pour dessiner un deuxieme rectangle a 1'interieur du 

premier: 

60 PLOT 20,20 
70 DRAW 20,380 
80 DRAW 620,380 
90 DRAW 620,20 
100 DRAW 20,20 
110 GOTO 110 
run 

Appuyez deux fois sur [ESC] pour sortir du programme 

MOVE 
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La commande MOVE fonctionne comme PLOT, c'est a dire que le curseur grapbique se place 
sur le point des coordonnees x, y sans tracer le pixel au nouvel emplacement du curseur. 

Tapez: 

els 

move 639,399 

Bien que nous ne le voyons pas a l'ecran, le curseur graphique se trouve maintenant dans Tangle 

superieur droit 

MettODS cette position en evidence en tracant une ligne a partir de ce point vers le centre de Pecran. 

Tapez: 

draw 320,200 

Cercles 

On peut dessiner des cercles a 1' aide des commandes PLOT ou DRAW. 
Pour dessiner un cercle, vous pouvez placer les coordonnees x et V a chaque point de sa 
circonference. Sur la figure suivante, un point "p" peut etre place avec la commande PLOT, en 
utilisant les coordonnees x et y. 

x«190*cos(a) 

y-190*sin(a) 



7K 



/ 



BORDDE 
L'ECRAN 




<r 



320 
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Posltionnement du centre d'un cercle 

Ows les programmes precedents, on avait fix6 le centre par rapport an coin taOrieur gauche : de 
nam. Pour tracer un cercle au milieu de l'ecran, il faut placer son centre aux coordonnees 320 
ct 200, puis dessiner tous les points du cercle par rapport a ce centre en ajoutant les coordonnees 
4e ce dernier. Voici un programme pour obtenir un cercle : 

new 

10CLS ..... 

20DEG 

30 FOR a-1 TO 360 

40 MOVE 320,200 

50 DRAW 320+190*COS(a),200+190*SIN(a) 

60 NEXT 
run 

Le mot cle" NEW precedant l'entree du programme remet la memoire a zero (comme une 

reinitialisation), sans toutefois effacer recran. 

Le rayon du cercle pent etre reduit en diminuant le nombre 190 (nombre de pixels). 

Pour obtenir un cercle determine d'une maniere differente (en radians), enlevez la ligne 20 en 

■put: 

20 

Pour dessiner un cercle plein (un disque) avec des Hgnes tracees a partir du centre, modifiez (EDIT) 
k tigne 50 en rempla9ant le mot PLOT par le mot DRAW. Elle devient : 

50 DRAW 320+1 90*COS(a) ,200+1 90*SIN (a) 

Bttyez maintenant avec et sans la ligne 20. 

Notes que dans la ligne 60 de ce programme, N EXT n'est pas suivi de a. Onpeutmettreseulement 
NEXT- l'ordinateur determine alors a quel FOR il se rapporte. Dans les programmes contenant 
± iwmbreux FOR et NEXT, il est toutefois preferable d'ajouter la variable apres NEXT afin de 
aieux s'y retrouver. 
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ORIGIN 

Dans le programme precedent, on s'est scrvi de la commande MOVE pour fixer !e centre ducerclc, 
puis on a ajoutt* les coordonnees x et y a celles du centre. Au lieu de cela, nous pouvons utiliser 
U commande ORIGIN (attention, pas de E a ORIGIN, c'est un mot reserve). Elle place les 
coordonnees x et y en fonction d'ORIGIN. Verifions ceci avec le programme : 

new 

10CLS 

20 FOR a-1 TO 360 

30 ORIGIN 320,200 

40 PLOT 1 90*COS(a),190*SIN(a) 

50 NEXT 

run 

Pour obtenir quatre petits cercles snr 1'ecran, entrous le programme suivant : 

new 

10CLS 

20 FOR a-1 TO 360 

30 ORIGIN 196,282 

40 PLOT 50*COS{a),50*SIN(a) 

50 ORIGIN 442,282 

60 PLOT 50*COS(a),50*SIN(a) 

70 ORIGIN 196,116 

80 PLOT 50*COS(a),50*SIN(a) 

90 ORIGIN 442,116 

100 PLOT 50*COS(a),50*SIN(a) 

110 NEXT 

run 

Pour experimenter une iflfrettethode de creation d'un cercle, tapez le programme : 

new 

10 MODE 1 

20 ORIGIN 320,200 

30DEG 

40 MOVE 0,190 

50 FOR a-0 TO 360 STEP 10 
60 DRAW 190*SIN{a),190*COS(a) 
70 NEXT 
run 

Cetfc foil, une ligne est tracee (DRAW) de coordonwfe en cordoonee sur rensembk de la 

circonfticace. Le tracage est nettement plus rapide que le posiuonnement des points. 

Une fois encore, observez la consequence du retrait de la commande DEG par suppression de la 

ligne 30 et relancez le programme. 
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FILL 

La commande FILL sert a remplir une zone d'ecran delimhee par un dessin, ainsi qo'une fenetre 
graphique ou le bord de 1 'ecran. 

Winirialisez a l'aide des touches [CONTROL], [SHIFT] et [ESC], puis tapez : 

new 

10CLS 

20 MOVE 20,20 

30 DRAW 620,20 

40 DRAW 31 0,380 

50 DRAW 20,20 

run ,.-„fr 

Un triangle apparalt a 1 'ecran. Placez le curseur graphique au centre de l'ecran en tapant : 

move 320,200 

A l'aide du mot cle" Fl L L suivi d'un numero de stylo (3 par exemple), remplissez l'ecran a partir 
de la position du curseur graphique (centre de l'ecran) jusqu'aux limites tracees. Tapez : 

fill 3 
Amenez maintenant le curseur graphique a I'exterieur du triangle : 

move 0,0 
Observez ce qui se passe si vous tapez : 

fill 2 

A l'aide du stylo numero 2, l'ordinateur a rerapli la zone comprise entre les lignes tracees et les 
rords de l'ecran. 

vfodifiez le programme et regardez ce qui se passe : 

50 DRAW 50,50 
60 MOVE 320,200 
70 FILL 3 
run 

route discontinuite" de lignes sur l'ecran laisse "passer" la couleur du stylo. 
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Ce phenornene est illustre par le remplissage d'un cercle positionne a recran, puis d'un cercle 
trace. Tapez : 

new 

1.0 CLS 

20 FOR a-1 TO 360 

30 ORIGIN 320,200 

40 PLOT 190*COS(a),19(hSIN(a) 

50 NEXT 

60 MOVE -188,0 

70 FILL 3 

nan 

Tapez maintenaut : 

new 

10 MODE 1 

20 ORIGIN 320,200 

30DEG 

40 MOVE 0,190 

50 FOR d-0 TO 360 STEP 1 

60 DRAW 190*SIN(d),19OCOS(d) 

70 NEXT 

80 MOVE -188,0 

90 FILL 3 

nin 

Vous pouvez rendre la circonference du cercle invisible en utilisant la mtae couleur pour le stylo 
et le papier. Ajoutez cette ligne : 

45 GRAPHICS PEN 2:INK 2,1 
run 

La coranande GRAPHICS PEN setectionne le stylo pour le tracage des grapbiques. La 
commande INK specific la couleur d'encre de ce stylo qui en roccurence, est la meme que celle 
du papier (id, numeio de couleur 1 ). 
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Pour terminer, tapez ce programme dc o^monstration : 

NEW 

10 MODE 1 

20 MOVE 0,200:DRAW 640,200 

30 FOR x-80 TO 560 STEP 80 

40 MOVE x,0:DRAW x,400 

50 NEXP.MOVE -40,300 

60 FOR c-0 TO 7 

70 MOVER 80,0:FI LLc 

80 MOVER 0,-200; FILL C+8 

90 MOVER 0,200:N EXT 

100 GOTO 100 

run 

Lcs couleurs des zones en plein peuvent etre modifiees apres leur rempHssage. Tapez 

100 SPEED INK 30,30 

1 10 BORDER RND*26 

120 INK RND*1 5,RND*26,RND*26 

130 FOR t-1 TO 500:NEXT:GOTO 110 

run 
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Complements d'informations 

Consultez la partie "Graphiques" du chapitre "A vos heures de loisir..." pour un guide complet des 
possibility graphiques du 464/6128. 

Pour terminer ce chapitre, void quelques programmes de demonstration graphique integrant des 
commandes etdes m&hodes desormais a votre portee. Chacun de ces programmes trace des motifs 
encontinu. 

new 

10 BORDER 0:GRAPHIC PEN 1 

20 m-CINT (RND-2):MODE m 

30 i1-RND*26:i2-RND*26 

40 IF ABS(i1-i2) <10 THEN 30 

50INK0,i1:INK1,i2 

60 s-RND*5+3:ORIGIN 320,-100 

70 FOR x-1000 TO STEP s 

80 MOVE 0,0: DRAW x,300:DRAW 0,600 

00 MOVE 0,0: DRAW -x,300:DRAW 0,600 

100 NEXT:FOR t-1 TO 2000:NEXT:GOTO 20 

run 

10 MODE 1:BORDER 0: PAPER 

20 GRAPHICS PEN 2:!NK0,0:i«14 

30 EVERY 2200 GOSUB 1 50 

40 FLAG-0:CLG 

50INK2,14+RND«12 

60B%=RND*5+1 

70 C%»RND«5+1 

80 ORIGIN 320,200 

90 FOR A-0 TO 1000 STEP Pl/30 

100X%-100*COS(A) 

110 MOVE X%,Y% 

120 DRAW 200*COS(A/B%),200*SIN(A/C%) 

130IFFLAG-1THEN40 

140 NEXT 

150FLAG-1:RETURN 

run 
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1 MODE 1 :BORDER 0:DEG 

20 PRINTVEUILLEZ PATIENTER" 

30 FOR N-1 TO 3 

40 INK 0,0:lNK 1,26:INK 2,6:INK 3,18 

50 IF N-1 THEN SA-1 20 

60 IF N-2 THEN SA-1 35 

70 IF N-3 THEN SA-1 50 

80 IF N-1 THEN ORIGIN 0,-50,0,640,0,400 ELSE ORIGIN 0,0,0,840,0,400 

90 DIM CX(5),CY(5),R(5),LC(5) 

100 DIM NP(5) 

1 10 DIM PX%(5,81),PY%(5,81) 

120 ST-1 :CX(1)-320:CY(1 )-200:R(1 )-80 

130FORST-1TO4 

140R(ST+1)-R(ST)/2 

150 NEXT ST 

160 FOR ST-1 TO 5 

170LC(ST)=0:NP(ST)-0 

180 NP(ST)=NP(ST)+1 

190PX%(ST,NP(ST))-R(ST)-SIN(LC(ST)) 

200PY%(ST,NP(ST))-R(ST)*COS(LC(ST)) 

210 LC(ST)-LC{ST)+360/R(ST) 

220 IF LC(ST)<360 THEN 180 

230 PX%(ST,NP(ST)+1)-PX%(ST,1) 

240 PY%(ST,NP(ST)+1)-PY%(ST,1) 

250 NEXT ST 

260 CLS:CJ-REMAIN(1):CJ-REMAIN(2) 

270 CJ-REMAIN(3):INK 1,2:ST-1 

280 GOSUB 350 

290 LOCATE 1,1 

300 EVERY 25,1 GOSUB 510 

31 EVERY 1 5,2 GOSUB 550 

320 EVERY 5,3 GOSUB 590 

330 ERASE CX,CY,R,LC,NP t PX%,PY%,NEXT 

340 GOTO 340 

350 CX%-CX(ST):CY%-CY(ST):LC(ST)-0 

360 FOR X%-1 TO NP(ST) 

370 MOVE CX%,CY% 

380 DRAW CX%+PX%(ST,X%),CY%+PY%(ST,X%),1+(ST MOD 3) 

390 DRAW CX%+PX%(ST,X%+1),CY%+PY%(ST,X%+1),1+(ST MOD 3) 

400 NEXT X% 

410 IF ST-5 THEN RETURN 

420 LC(ST)-0 

430 CX(ST+1 )-CX(ST)+1 .5*R(ST)-SIN(SA+LC{ST)) 

440 CY(ST+1 )-CY(ST)+1 .5*R(ST)-COS(SA+LC(ST)) 

450 ST-ST+1 

460 GOSUB 350 

470 ST-ST-1 
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480 LC(ST)-LC(ST)+2-SA 

490 IF (LC(ST) MOD 380)o0 THEN 430 

500 RETURN 

510IK(1)-1+RN[>25 

520 IF IK(1)-1K(2) OR 1K(1)-IK{3) THEN 510 

530INK1,IK(1) 

540 RETURN 

550IK(2)-1+RNI>25 

580 IF IK(2)-IK(1) OR IK(2)-IK(3) THEN 550 

570INK2,IK(2) 

580 RETURN 

590IK{3}-1+RND-25 

600 IF IK(3)-IK(1) OR IK(3)-IK(2) THEN 590 

610INK3,IK(3) 

620 RETURN 



■■&& 
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Partie 9 : Utilisation des sons 



Les effets sonores sont produits par un haut parieur integre" a l'ordinateur. 
Le niveau sonore est regie par le bouton VOLUME, place - sur le cote droit de 1'ordinateur. Le son 
peut aussi passer de la prise STEREO de l'ordinateur a l'entree auxiliaire de vptre chatne hi-fi. 
De plus amples renseignements pour la connexion a la prise STEREO sont donn6s dans la partie 
2 de ce cnapitre. 

La commande SOUND 

La commande SOUND comporte sept parametres. Si les deux premiers doivent etre precises, les 
antres sont facultatifs. La commande s'ecrit de la maniere suivante : 

SOUND <etatde canal>,<penode sonore>,<dure€>,<volume>,<enveloppe de 

volume> > <enveloppe deton>,<bruitage> 

D'apparence complexe, ces parametres sont en fait faciles a identifier. Nous allons les etudier un 
parun. 

Etat decanal 

Pour plus de simplicity nous allons provisoirement rassimiler au canal sonore lui meme. H existe 
mis canaux sonores et nous nous occuperons pour 1'instant de l'<6tat de canal> numero 1 . 

Wriode sonore 

u <Periode sonoro conceroe la definition technique de la hauteur de note : do, rt, mi, fa, sol, la, 
n. Chaque note est associee a un nombre representant sa <Periode sonoro. En vous reportant au 
cnapirre 'Pour information.. .", vous verrez que la note do correspond a une penode de 239. 

ifinitialisez l'ordinateur avec [CONTROL], [SHIFT] et [ESC] puis tapez : 

10 SOUND 1,239 
run 

Vous entendrez un do pendant 0,2 seconde. 

Si vous ne percevez aucun son, assurez-vous que le bouton de VOLUME de votre ordinateur n'est 
■as sur z6ro.Tapez RUN une nouvelle fois. 
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Dur6e 

Ce parametre determine la duree du son et s'exprime en centiemes de seconde. En l'absence de 

specification, l'oidinateur fixe un chiffre de 20, soit 0,01 x 20, ce qui donne une duree de 0,2 

seconde. 

Pour faire draer la note une seconde, il faudra done lui attribuer le parametre de 1 00; pour deux 

secondes, 200. Tapez : 

10 SOUND 1,239,200 
run 

La m&ne note do dure 2 secondes. 

Volume 

Ce parametre determine le volume de depart d'une note. Ce nombre varie de a 1 5. correspond 
au volume minimum et 1 5 an volume maximum. En l'absence de specification, Tordinateur fixe 
un chiffre de 1 2. Tapez : 

10 SOUND 1,239,200,5 
run 

Remarquez le volume du son puis tapez un numero de volume superieur : 

10 SOUND 1,239,200,15 
run 

Vous devez obtenir un son plus fort 

Enveloppede volume 

Pour fiiire varier le volume d'un son pendant son emission, vous pouvez specifier une enveloppe 

de volume a l'aide de la commande E N V. Vous avez la possibility de fixer plusieurs <enveloppes 

de volumo differentes, chacune ayant son propre numero de reference, tout comme la commande 

SOUND. 

Si vous avez cree une enveloppe de reference N1 et que vous desiriez l'utiliser dans une commande 

SOUND, tapez 1 a l'endroit requis pour le parametre de l'enveloppe. Nous expliquerons bientdt 

la creation d'une enveloppe de volume. 
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Enveloppe de tonality 

voos pouvez utiliser la commande ENT pour faire varier le ton d'une note pendant son emission. 
Vous avez la possibility de fixer plusieurs enveloppes de tonality qui, comme la commande 
SOUND, ontcnacuue un numero de reference. Si vous creez une enveloppe de tonalite" de 1 et 
jx vous faites appel a la commande SOUND, tapez 1 a I'endroit requis pour le parametre de 
. <enveloppe de tonalite>. Nous expliquerons bientdt la creation d'une enveloppe de tonalit6. 

Bruitage 

Cest le deniierpaiarnetredetaconinande SOUND. H peut varierde 1 a 31 . Ajoutez le parametre 

2 i la fin de la commande SOUN D et ecoutez l'effet obtenu. Faites-le passer a 27 et constatez la 
Jdference. Tapez : 

SOUND 1, 239,200,1 5,„2 

lamrquez que les deux parametres precetlant le parametre de <bruitage> (,„) ont 6t£ omis. lis 
acbqoent ainsi rabsence d*<enveloppe de volumo et de <tonalite>. 

Creation d'une enveloppe de volume 

cnr s'obtient par la commande ENV. Sous sa forme de base, cette commande possede 4 
^rametres. EUe se presente ainsi : 

ENV <numero d'enveloppe>,<nombre de pas>,<amplitude du pas>,<duree du 
pas> 

romme prec6demment, nous allons etudier ces parametres un par un. 

Num6ro d'enveloppe 

rest un num6ro de reference (entre et 15) qui est appel6 par la commande SOUND. 

sombre de pas 

; parametre specifie le nombre de pas devolution du volume sonore entre le dfibut du son et sa 
*a. Par exemple, pour une note de lOsecondes, vous pouvez obtenir lOpasd'unesecondecnacun. 
yms ce cas, le parametre du <nombre de pas> sera egal a 1 0. 

:* nombre peut varierde a 127. 
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Amplitude du pas 

Chaque pas peut faire varier le volume de a 1 5 par rapport au pas precedent Les 1 6 volumes 
different* sont les memes que ceux de la commande SOUND. Cependant, le parametre d'<am~ 
plitnde du pas> peut varier de -1 28 a +1 27, car le volume revient a apres avoir depasse 1 5 ( 1 6, 
32, 48, 64, 80, 96, etc.). 

Durte du pas 

Ce parametre specifie la duree de chaque pas par increment de 0,01 seconde. D varie de a 255, 
soit une duree maximale de 2,56 secondes (0 est conside're' comme 256). 



; que le <nombre de pas> multipli6 par la <duree du pas> ne doit pas depasser le parametre 
t> de la commande SOUND, car le son cesserait avant que le dernier pas n'ait 6te atteint 



Notezi 

<dur6e>i 

(entralnant la perte du reste de l'enveloppe de volume), 

De mfime, si le parametre <duree> de la commande SOU N D depasse le <nombre de pas> mulriplie' 
par la <duree du pas>, le son se poursuit apres avoir atteint le dernier pas et garde le volume finaL 

Pour tester renveloppe de volume, tapez le programme : 

10 ENV 1,10,1,100 

20 SOUND 1,142,1000,1,1 

run 

La Kgne 20 specifie un son d'une periode de 142 (LA international), durant 10 secondes avec un 
volume de depart de 1 , utilisant l'enveloppe de volume numero 1 constituee de 10 pas, elevant 
chaque pas d'une unite de volume et durant une seconde (1 00 x 0,01 sec). 

Changez la ligne 10 de la maniere suivante et faites run chaque fois pour entendre la difference : 

10 ENV 1,100,1,10 
10 ENV 1,100,2,10 
10 ENV 1,100,4,10 
10 ENV 1,50,20,20 

10 ENV 1,50,2,20 
10 ENV 1,50,15,30 

Essayez finalement : 

10 ENV 1,50,2,10 

Vous pouvez constater que le niveau sonore reste constant a mi-chemin. En effet, le nombre de 
pas(50) et 1 'ecart entre les pas (0, 1 seconde) donnent une variation du son de 5 secondes seulement, 
alors que la <duree> du son dans la commande SO UN D (la ligne 20) est de 1 000, soit 1 secondes. 

Experimentez les types de sons que vous pouvez creer. 

Si vous le ddsirez, vous pouvez creer des enveloppes de volume plus complexes. Les trois 
parametres <nombre de pas>, <amplitude du pas> et <dur6e du pas> peuvent etre repris jusqu'a 
quatre fois a la fin de la commande ENV, permettant de specifier des portions d'enveloppe 
diffe'rentes. 
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Df&tlofi d'tine enveloppe de tonality 

j canrsBsk d'eavcdoppe <fc lonalik e« ENT . Sw* m fonnt de hue, efle * *i paranttx*, Qk 

* p ^mrir to ja l.i forme : 

ENT «*ji»Er> d'eovBlaMe>.<nHiifaK dc p*j> # <v*riatkjn de periods sonare 
tffcCitoictaqwp«>,<durfedafHB> 

fc^riowcWpMtmtttnr>pu-»a 

tiumferotfenwtappe 

-si le iwn^rti dippd pour U a*oau&de SOUND, D pert prendre line t*J»i <k 6 m 

Nombre de pas 

- juranfetrti fixe k nodn * m do I* keali* d* *** *■** «■ **■* *■ ** ■■*- 8* pM-cMmple. 
js use dart 10 lecoodea, f«il pouwi obttiur 10 p*» d fc « wooadft cfaCfrtL Lc ptrameifr 
jaufcrc de p*i> efl jflfiit egu 1 10. 

pMvjrierdc0l239. 



variation de perlode sonore affects 3 chaque pa* 

■tarn ua* poft £kirE vbw la bwtaw ik sin dc -1» A +1 27 far rippon *i p*i prtt&fcj* I ** 
,*i^iiiftMpnHiicjakli*^ieiirifcb 

-ncsfUKl I 0. Vw» <te*ex *atf compie dc ce* uouoci lortquc *au« deTifliss« hoc cavttoppe 
* uniii*. Vot* Hwuvat* kutu to pKiibdJUl dc pen** dc ion ni clupiBre 'Tout Inform* 



Durte du pas 

* mmtiir ipdciffe 1* (toe* de claque pa» pu incrimenl de 0^1 iecondf -0 virk de i 2». 

^i«duj>e>m*sAiuk.de2^5«oa^ 

* <ranfarc dc p**> amtonli* par h <:durte dc p*& at doK r*» depawer fc panmfctic <d»rfe> 

* ta cantwude SOUND, cai k *on«eueaiimBt qu* te dtnikr pu I'lit «tt «eiin CeBralnani 
i gtfk du iwfe dc 1' u ft' K. kpp e Ac tonaJiie). 

c attne. h k pvn*m de <*ude> fc 1* caommde SOUND depute k <aoatm de pna> 
— *f^ r h qfairtcdupiix l£»nlCI«^J^^Hi^'^* v ^ ate ™ Itedwa,0 P* let ** , * ll 
I flute 
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Pour tester Tenveloppe de tonality, tapez le programme ci-dessous : 

10 ENT 1,100,2,2 

20 SOUND 1,1 42,200,15„1 
run 

La ligne 20 specifie un son d'une periode de 142 (LA international), durant 2 secondes avec un 

volume de d6part de 1 5, depourvu d'enveloppe de volume (constatez 1 'omission du parametre : 

„) mais dote" d'une enveloppe de tonality Nl. 

La ligne 10 affecte au N1 une enveloppe de tonalie constitute de 100 pas augmentant la periode 

de 2 unites a chaque pas et ayant chacune une duree de 0,02 seconde (2 x 0,01 s). 

Modifiez maintenant la ligne 1 selon les trois manieres indiquees et lancez le programme pour 

entendre l'effet obtenu. 

10 ENT 1,100,-2,2 
10 ENT 1,10,4,20 
10 ENT 1,10,-4,20 

Remplacez la commande SOUND et l'enveloppe de tonality en tapant : 

10 ENT 1,2,17,70 

20 SOUND 1,71,140,15„1 

30 GOTO 10 

am 

Appuyez deux fois sur [ESC] pour interromprc le programme. 

Vous pouvez maintenant combiner 1 'enveloppe de volume, l'enveloppe de tonalite" et la 

commande SOUND pour obtenir des sons differents. Commencez par taper : 

10 ENV 1,100,1,3 

20 ENT 1,100,5,3 

30 SOUND 1,142,300,1,1,1 %. ..,. , ,,u ^ . - 

run 

Puis remplacez la bgne 20 par: '=■■'" -■'■"?*!-* ( f-» ■s"»w 1 - 

20 ENT 1,100,-2,3 
run 
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Remplaeez maintenant toutes les Ugnes par : 

10 ENV 1,100,2,2 

20 ENT 1,100,2,2 *.. .. 5 ^ 

30 SOUND 1,1 42,200,1,1,1 

run 

Si vous de'sirez creer des enveloppes de tonalitg plus complexes, vous pouvez rep6ter jusqu'a 
quatre fois les trois paramfetres : <nombre de pas>, <variation de p6riode sooore affect£e a cbaque 
pas> et <duiee du pas> a la fin de la commande ENT afin de specifier des portions difterentes 
pour une mfime enveloppe. Essayez plusieurs versions. Ajoutez a la commande SOUND le 
parametre permettant d'ajouter du braitage et des portions supplementaires d'enveloppe de 
tonalite' et de volume. 

Le cbapitre "Liste complete des mots cl6s du BASIC AMSTRAD 464/6128" decrit en d6tail les 
commandes de son. Si vous desirez decouvrir les possibility sonores de votre ordinateur, 
rcportez-vous au paragrapbe "Sons et musique" du chapitre "A vos beures de loisir...". 
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Partie 10 : Introduction a AMSDOS et CP/ 
(6128seulement„) 

Qu'est-ce que AMSDOS ? 

AMSDOS estrabrtviationd'AMstrad Disc Operating System (systfemed'explototionde ^5 
AMSTRAD),of&aDtlesc^nimandesdefichiersetles fonctioosci-dessous,modifides pourutt 
le lecteur de disquettes du 6128 au lieu du lecteur de cassettes du 464. 

LOAD "nomfich" 
RUN "nomfich" 
SAVE "nomfich" 
CHAIN "nomfich" 

MERGE "nomfich" 

CHAIN MERGE "nomfich" 

OPENtN "nomfich" 

OPENOUT "nomfich" 

CLOSEIN 

CLOSEOUT 

CAT 

EOF 

INPUT #9 

LINE INPUT #9 ,.;..... 

LIST#9 

PRINT #9 

WRITE #9 

Copier la totality d'un dlsque 

Le contenu d'une disquette peut etre copie sur une autre disquette par le programme D1S< 

contenu sur la Face 1 de la disquette systeme CP/M. 

Vous pouvez vous servir de cette methode pour effectuer des copies de sauvegarde de 

disquette systeme originate elle-meme. 

Inserez la disquette dans le lecteur, face 1 vers le haut et tapez : 

|cpm 
Apres Tinvite A>, tapez : 
dteckit 
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Au bout dc qnelques secondes, vous pourrez voir le message cTaccueil du DISC KIT s'afficber 
en haut de l'ecran, suivi de : 

one drive found 

Ce message indique que vous etes sous rntUtame DISC KIT et que l'oidinateur a detecte" 
I'exploitation d'une seule unite de disquette (celle qui est integree a l'ordinateur). 

Si une unite suppiementaire est reliee au systeme, le message sera : 

Two drives found 
Ce menu apparaftra en bas de Tecran : 



Copy 

Format 

Verify 

Exit from program 



: j'agit du menu principal de DISC KIT. Les numeros inscrits dans les cases correspondent aux 
_uches de fonction situees a droite du clavier (fO, f 1 , f4 et f7). Faites votre selection a 1' aide de 

j -xwcbe voulue. 

._* fait d'appuyer sur la touche de fonction fO a ce stade des operations vous fait sortir du 
a-.-^ramme DISC KFT pour vous ramener sous le systeme CP/M (message A>). 



7 




4 


1 






vous voulez copier une disquette, appuyez sur f7. 



ATTENTION 

LA COPIE SUR UNE DISQUETTE DEJA ENREGISTREE ENTRAINERA 
L'EFFACEMENT DE SON CONTENU. 



iHdmentaire 
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Copie sur un systeme k une seule unite 

Si vous utilise* un systeme a une seule unit* (sans unite supplementaire raccoroee), vous tecevez 
a l'ecran le message : 







Copy 

Any other key to exit menu 



Vous devez alors retirer votte disquette systeme CP/M de I'uniteet insfirerU disquette a dupliquer. 

Pour dupliquer la disquette systeme, U suffit de la laisser dans r unite. 

Si la disquette source (celle dont vous voulez copier le contenu) se trouve dans 1'unite, tapez Y. 

Uordinateur examine le format de la disquette et l'affiche en haut de l'taan, pour votre 

information. 

Au bout d'un moment, ce message vous est adresse : 

Insert disc to WR ITE 

Press any Key to continue T "■' . ^ 

Vous devez alors retirer la disquette source de 1'unite, insurer la disquette able (celle sur laquelle 

vous desirez copier les donnees), puis appuyer sur une touche quelconque du clavier. 

Les informations sur le format de la disquette cible sont affichees en haut de l'ecran, meme s'il 

s'agit d'une disquette cible non formatee. 

Si la disquette cible n'est pas conectement formatee (voire pas formatee du tout), le formatage 

s'effectuera pendant la duplication et vous verrez apparattre le message : 

Disc isnt formatted (or faulty) 
Going to format wtii le copying 
Disc will be system format 

. . .ou un message similaire, suivant les disquettes cible et source. 

Lorsque l'ordinateur est pret pour la lecture de la disquette source, il vous rornmiirJque a 

message : 

Insert disc to read 
press any key to continue 

. . .vous devez alors inserer la disquette source. 
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_ acnevement de l'operation de copie, apres repetition de cette manipulation desdisquettessouce 
r: cible, est signal* par le message : 

Copy completed 

Remove disc 

Press any key to continue 

. Suivez alors les instructions afficbees a l'ecran, qui vous laissent le choix entre copier une autre 
Duquette (en tapant Y) et revenir au menu principal du DISC KIT. 

Protection en Ecriture 

ous ne pouvez pas effectuer de copie sur une disquette dont le trou de protection en ecriture est 
uvert Si vous tentez de le faire, vous obtenez ce message : 

Discwrfte-protected 
Insert disc to WRITE 
R-etry or C-ancel 

" ipez alors C pour annuler, retirer la disquette et inserez-en une autre appropriee a la copie. 
eillez a ne JAMAIS fermer le trou de protection en ecriture des disquettes dont vous souhaitez 
roserver le contenu, ce qui est le cas des disquettes systeme CP/M. 

Verification des disquettes 

_« programme DISCKIT vous offre egalement la possibilite de verifier les disquettes. 

^ rysteme affiche les informations concernant le format de la disquette et effectue la lecture de 
:us les fichiers qu'elle contient Toute erreur de'tectee a l'interieur d'un fichier est signalee a 

*cran. 

■xi verifier une disquette, inserez Tune des disquettes CP/M, face 1 vers le haut, et tapez ; 

|cpm 

'. la suite du message A, tapez: 

discklt. 

^tectionnezroption Verify du menu principal du DISCKIT (touchefl)et suivez les instructions 
JScMes. Une fois la disquette a verifiee dans l'unite, tapez Y pour lancer l'operation. La fin de 
j %^rification est signalee par : 

Verify completed 

Remove disc 

Press any key to continue 

.-us pouvez alors effectuer une autre verification en tapant Y, ou revenez au menu principal du 
:<SCKIT en appuyant sur toute autre touche. 
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Partie 1 1 : Introduction a BANK MANAGER 
(6128 uniquement) 

Utilfser les autres 64Ko de la mimoire 

Le 6128 Plus possede une RAM (Random Access Memory ou 'memoire vive") de 128ko, divisee 
en deux parties de 64Ko. CP/M Plus utilise en permanence la totality de ces 128Ko, alors que le 
BASIC n'exploite que la premiere partie de 64Ko disponible. H serait dommage de laisser a 
l'abandon ces 64Ko au cours d'une programmation en BASIC. C'est pourquoi un programme a 
6t6 mis a disposition pour Sexploitation de cet espace memoire inutilise. Ce programme offre des 
commandes speciales supplementaires pour permettre l'utilisation de la seconde partie de RAM, 
soit pour le stockage des images d'ecran, sort pour la m6morisation de chalnes. 

Ce programme fournissant des commandes supplementaires s'intitule BANK MANAGER, 
"gestionnaire de bloc", le terme technique "bloc" designant une partie de la memoire. 

Utlliser BANK MANAGER pour les Images d'ecran 

Le 6128 affiche en permanence une image a l'ecran. D exploite pour ce faire 16Ko de memoire 
pour 8tocker les informations concernant la couleur et la brillance de cbaque pixel de 1 'ecran. Le 
6128 gere six blocs de I6K0, ce qui signifie six images d'ecran stockees siimultanement dans la 
memoire de I'ordinateur. BANK MANAGER vous permet de jongler et d'afficher un ma x i m u m 
de cinq images d'ecran avec le BASIC. 

A la mise sous tension, le systeme d'affichage exploite un bloc memoire de I6K0 ; nous 
rappellerons "bloc 1". Les quatre autres ecrans sont contenus dans la seconde partie de 64Ko, 
dans les blocs 2, 3, 4 et 5. 

Seul le bloc 1 (contenu dans la premiere partie de la memoire) peut servir a l'affichage d'un ecran. 
Pour visualiser un bloc stocke dans la deuxieme partie (blocs 2 a 5), il faudra done le placer dans 
le bloc 1 . BANK MANAGER fournit toutes les commandes necessaires pour deplacer les ecrans 
ISCREENCOPY. par exemple, transfere un ecran sur un autre ecran en ecrasant le contenu de ce 
demier. |SCREENSWAP, pour sa part, permute le contenu des ecrans. 

Tout comme AMSDOS 6voqu6 precedemment, BANK MANAGER dispose de "commandes 
extemes" commencant par le symbole | (barre verticale), que vous obtenez en appuyant simulta- 
nement sur tSHIFT] et @. 
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Utilisation de BANK MANAGER 

aeuritialisez l'ordinateur en appuyant sur ies touches [CONTROL] [SHIFT] et [ESC], inserez 

; one des disquettes systeme, face 1 vers le haut, puis tapez : 

RUN "BANKMAN" 

La procedure de cbargement de ce programme est deMllee au chapitre 6, partie 13, concernant 
a extensions residentes du systeme (RSX). Une certaine comprehension de ces extensions et de 
j reservation d'espace memoire est recommandee pour rutilisation de ces sous-programmes. 
}ooi qu'il en soit, pour les exemples qui suivent, vous n'avez pas a maltriser la procedure de 
±argement 

rape: 

MODE1 

PRINT "CECI EST L'ECRAN PAR DEFAUT" 

|SCREENSWAP,1,2 

le texte doit alors disparaltre de recran. Vous cherchez maintenant ce qa'ctait le contenu de 
&xan 2 (bloc 2 de la memoire). Si rordinateur vieot d'etre mis sous tension, vous avez 
nobablement a recran une image aleatoire. Pour l'eflacer, tapez : 

MODE 1 

. .puis : 

PRINT "CECI EST L'ECRAN 2" 
|SCREENSWAP,1,2 

u. texte initial s'affiche de nouveau. Si vous repetez la commande |SCREENSWAP,1,2, vous 
aostaterez que les contenus des deux ecrans ont ete intervertis. Vous pouvez ainsi echanger les 
antenus des cinq ecrans disponibles, mais u'oubliez pas que seuls les echanges impliquant recran 
. wont visibles a recran. 

_'aotre commande disponible est JSCREENCOPY. Hie vous permet de copier un ecran sur un 
: avec ecrasement des anciennes donnees. 



Tapez: 

MODE1 

PRINT "CECI EST L'ECRAN A COPIER" 

|SCREENCOPY,2,1 

jt contenu de l'ecran 1 est copie sur recran 2. Si vous inversez les parametres en tapant : 

MODE1 
|SCREENCOPY,1,2 

. .le contenu de l'ecran affiche est ecn»6 par celul de l'ecran 2. 
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Uprcmittparainftlreest<toi^ 
4 paitir duquel s'effectue celle-ci. 

Lorsque vous copiez des ecrans et que les MODEs des ecrans sont different*, vous obtenez un 
affichage disjoint, de meme si vous avez effectud un defilement d'dcran depuis la demiere 
commode MODE Les commandes d'ecran de BANK MANAGER sont plutot deshnees aux 
ecrans graphiques qu'aux ecrans de texte car les defilements y sont moms frequents. 

Utillser BANK MANAGER pour le stockage de chatnes 

BANK MANAGER dispose de quatre commandes supplemental destinies a l'utUisation des 
64Ko de rnemoire supplementaire pour archivage de chalnes alphanumeriques. 
La plupart des programmes peuvent se scinder en deux parties : d'une part, les instructions 
nroprement dites et d'autre part, les donnees du programme. Un programme de gestion de base 
de donnees comme un caraet d'adresse en est un bon exemple. Un tel programme utilise ud tableau 
de chalnes pour le stockage des noms et des adresses correspondant aux difierentes personnes 
repertoriees. 

Les chames sont stockees dans la seconde partie de 64Ko, l'une apres l'autre et bout a bout 
L'espace de stockage de ces chalnes peut se diviser en compartiments, appeies enregistrements. 
La longueur fixe d'un enregistrement est comprise entre 2 et 255 caracteres et la longueur d une 
chalne en BASIC varie selon son contenu. Les enregistrements servent a fournir des comparti- 
ments de taille standard propres au rangementdes chalnes d'information sous une forme ordonnee. 
A chaque stockage ou recherche de donnees dans un enregistrement, le systeme passe automat- 
iquement a renregistrement suivant pour une nouvelle operation. Cet enregistrement, appele 
"enregistrement couranf ', est automatiquement utilise, sauf specification contraire. 
Ce systeme de gestion de memoire est nomme "RAMdisc", car il fonctionne comme un disque a 
acces aleatoire. Ici, le support est remplacd par la RAM. 

Lisez les descriptions des differentes commandes pour comprendre leur raison d'etre, sinon leur 
fonctionnement, et passez aux exemples. 

La premiere commande RAMdisc est |BANKOPEN. Elle specific le nombre de caracteres 
contenus dans chaque enregistrement Void sa syntaxe : 

|BANKOPEN,n 

ou n est le nombre de caracteres de renregistrement compris entre et 255 ; mais les valeurs 
et 1 provoquent des effets inattendus. 
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IBANKWRITE stocke uoe chaine dans l'enregistrement en cours ; le pointeur d'enregistrement 
est incremente pour pointer sur l'enregistrement suivant, pr6t pour la prochaine operation. Voici 
i* syntaxe: 

|BANKWRITE,@r%,a$ 



...ou 



|BANKWRITE,@r%,a$,n 

oo r% est une variable entiere contenant un code de retour pour information sur le deroulement 
de l'operation, et a$ une variable alphanumenque contenant les caracteres a ecrire dans I enre- 
pstrement. Dans le premier exemple, l'enregistrement est renregistrement en cours. Dans le 
rcond, le parametre n, facultatif, specifie l'enregistrement sur lequel s'effectuera 1 operation 
d'ecriture. 

(BANKREAD lit 1'enregistrcrnent en cours et rcnvoie son contenu dans une chalne. Le pointeur 
d-enregistrement est ensuite incremente pour pointer sur renregistrement suivant, prftt pour la 
prochaine operation. La lecture d'un enregistremeDt le laisse inchange : il peut done etre lu et relu 
md^finiment Voici sa syntaxe : 

|BANKREAD,@r%,a$ 

...on 

|BANKREAD r @r%,a$,n 

ou r% est une variable entiere contenant un code de retour pour information sur le deroulement 
de Voperation, et a$ une variable alpbanumerique dans laquelle le contenu de l'enregistrement 
est transfer. Dans le premier exemple, renregistrement est l'enregistrement en cours. Dans le 
second, le parametre n, facultatif, specifie l'enregistrement a lire. 

La demiere commande, |BANKFIND, recherche une chatne particuliere dans Tensemble des 
enregistrements. Si la chalne est retrouvee, la commande envoie le numero de renregistrement. 
Voici sa syntaxe : 

jBANKFIND,@r%,a$ 

...ou 

|BANKFIND,@r%,a$,n 

...ou 

|BANKFIND,@r%,a$,n,m 
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. . .oft r% est une variable entiere qui renvoie soft le numero de l'enregistrenient dans lequel la 
chalne a 6t£ trouvee, soit un code indiquant que la cbatne n'a pas 6\6 trouvee ; a$ est la chalne a 
rechercher. Le parametre facultatif n specifie 1'enregistrement du debut de la recherche ; s'il n'est 
pas specifie', la recherche demane a 1'enregistrement en cours. Le deuxieme parametre facultattf, 
m, specifie 1'enregistrement de fin de recherche mfime si la chalne n'est pas retrouvee. en cas 
d'ormssion de m, la recherche se poursuit, jusqu'a concurrence des 64Ko de memoire, pouvant 
dans certains cas continuer au-dela du dernier enregistrement ecrit 

Passons maintenant a un exercice. Si vous avez deja lance le programme BANK MANAGER 
pour prendre connaissance des commandes d'echange d'ecrans et que vous n'avez pas reinitialise" 
rordinateur, ces commandes surjplementaires sont desormais r6sidentes. Dans le cas contraire, 
vous devez insurer I'une des disquettes systeme, face 1 vers le haut et taper : 

RUN "BAN KM AN" 

puis: 

|BANKOPEN,20 

La longueur de renregistrement est ainsi fixee a 20 caracteres et 1'enregistrement en cours est 0. 
Tapez alors : 

a$-"PREMIERE ENTREE"+SPACE$(5) 

La chalne a$ comprendra exactement 20 caracteres. 
Tapez maintenant : 

. . .afin d'initialiser la variable r%, 
puis: 

|BANKWRlTE f @r%,a$ 
a$ va done s'ecrire dans le premier enregistrement (0). Tapez ensuite : 

d$-SPACE$(20) 
|BANKREAD,@r%,d$,0 
PRINT d$ 

La premiere commande initialise d$ avec 20 espaces, suffisants pour contenir renregistrement en 
cours de lecture. La deuxieme commande lit renregistrement et place le resultat dans d$. La 
commande |BANKWRITE incremente le pointeur d'enregistrement d'une unite : il faut done 
specifier 1 'enregistrement pour la lecture. En effet, souvenez-vous que la lecture commence par 
deTaut a renregistrement en cours. Le resultat de la lecture est finalement affiche, d$ doit done 
contenir "PREMIERE ENTREE" et 5 espaces. 
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Tipez maintenant : 

b$-"DEUX"+SPACE$(1 6) 
C$-*TR0IS"+SPACE$((15) 

|BANKWRITE,@r%,b$,1 
|BANKWRITE,@r%,c$ 

Ce* instractioDS placent b$ et c$ dans les enregistrements 1 et 2. Le r*ramelre facultatif de la 
premiere commande [BANKWRTTE permet de placer b$ dans l'enregistrement 1. L'enregistte- 
:nent en cours passant ensuite a Tetiregistrement suivant, il n'est done pas necessaire de specifier 
: enregistrement de destination de c$, qui sera place automatiquement dans l'eDregistrement 2. 

Tipez: 

PRINT r% 

Le reswtat de PRINT r% dans cetexemple doit Ore 2. On peut considerer ce numero comnie le 
denier enregistrement sur leqnel une operation a &6 effectuee ou bien encore comme l'enregis- 
wment courant diminud d'une unite. Dans noire exemple, le demier enregistrement d'ecriture est 
2 et renregistrement suivant sera 3. 

L'interet de ce "code de retour 1 • est de nous rensdgner sur le d6roulement de Toperation qui vient 
je s'effectuer. Lorsque celle-ci a abouti, le code est positif et correspond a un numero d'enregis- 
TOnenL Sinon le code est negatif et renvoie a un code d'erreur. Les commandes |BANKWRTTE 
a {BANKREAD peuvent engendrer deux codes d'erreur : 

1 - fin de fichier, indique que tous les enregistrements ont etc passes en revue ou que 

renregistrement specific n'existe pas ; 

2 - erreur lors d'un changement de bloc, ce qui ne devrait jamais se riroduire. 
Pissons a d'autres exemples : 

d$-STRING$(20,"X") 

|BANKOPEN,20 

FOR n-1 to3:lBANKWRITE,@r%,d$:next 

d$ contiendra 20 x. IBANKOPEN reinitialise le pointeur d'enregistrement a 0, ce qui provoque 
secrasementdes enregistrements 0, 1 et2parlecontenude d$lors del'execution de la commande 
BANKWRTTE. 
Tapez maintenant : 

a$-"PREMIER" |BANKWRITE,@r%,a$,0 
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Cette instruction ecrit 'PREMIER" dans 1 'enregistrement 0, eaasant ainsi quelques X. A present, 
reinitialisez d$ avec 20 espaces : 

d$-SPACE$(20) 

Tapez : 

|BANKREAD,@r%,d$,0 

Le resultat de la lecture de l'enregistrement est place* dans la variable d$. Recapitulons : 

Les trois enregistrements contiennent des X. Dans renregistrement 0, nous avons introduit le mot 
■PREMIER''. Nous avons rempli d$ d'espaces puis introduit dans d$ le resultat de la lecture de 
l'enregistrement 0. Tapez maintenant : 

PRINT d$ 

Lere^tatdoitetre'PREMIERXXXXXXXXXXXJt^'^^ 

de ces commandes. Si la chalne placee dans un enregistrement ne le remplit pas entitlement, les 
caracteres non ecrases demeurent dans cet enregistrement n est done preferable d'y introduire 
une chalne d'espaces (CHR$(32)) avant d'y stacker de nouvelles donnees. Ceci evite, lors de la 
relectnre une chalne, de trouver des caracteres qui ne devraient pas y etre. Cette constatation 
conceme e*galement la chalne ou s'inscrit le resultat d'une lecture d'enregistremenL Si la chalne 
est plus longue que l'enregistrement, certains caracteres en fin de chalne resteront inchanges, ce 
qui explique la reinitialisation de d$ (par remplissage d'espaces) avant que n'y soit place - le resultat 
de la lecture de renregistrement 0. 

II est possible d'ecrire une chalne dans un enregistrement contenant moins de caracteres que 
celle-ci. Dans ce cas, les caracteres exceclents seront ignores. 

De meme, il est possible de lire le contenu d'un enregistrement dans une chalne comportant moins 
de caracteres que celui-ci. Li encore, les caracteres exceptants (lus dans 1'enregistrement) seront 
ignores. Habituellement, le BASIC augmente automatiquement la longueur de la chalne pour 
qu'elle accepte les caracteres exogdentaires. Ce n'est pas le cas avec les commandes extemes. 

Pour terminer, voyons la commande |BANKFIND. EUe permet de rechercher une chalne parmi 
un groupe d'enregistrements. Par exemple, si l'enregistrement 24 commence par 'PRED", cette 
commande permettra de le trouver : 

|BANKFIND,@r%,"FRED" 

Cette commande estextremement utile pour les programmes de gestion de bases de donnees, pour 
la recherche d'un nom ou d'une adresse. 
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(BANKFIND commence sa recherche a renregistrement courant et poursuit jusqu'a trouver la 
chalne en question, ou la fin de la seconde parte de 64Ko de memoire ou sont stocke"s les 
enregistjements. 

n est possible de specifier renregistrement de depart de la recherche en ajoutant un numero 
d'enregistrement a la fin de la commande. 

n est egalement possible d'introduire un autre numeTO d'enregistrement a la suite du premier pour 
■xtiquer renregistrement de fin de recherche. 

(BANKFIND peut aussi servir a retrouver une chame situee ailleurs qu'au d£but d'un enregistre- 
ment Pour ce faire, on placera devant les caracteres rechercltes des CHR$(0) qui, traites comme 
des jokers (tel '7" dans les noms de fichiers sous CP/M), pourront ainsi remplacer n'importe quel 
caractere. Voici un exemple ; 

a$-STRING$(1 0,0)+"FRED n 
|BANKFlND,@r%,a$,0 

Et voici retrouve" le premier enregistrement concemant le mot "FRED" smte entre le onzieme et 
quatorzifeme caracteres. Les dix premiers caracteres pourront contenir un numero de telephone ou 
tout autre information, que la commande |BANKFIND ignorera. 

Le numero de renregistrement oil se trouve la chame sera place* dans la variable eutiere r% servant 
de code de retour (si "FRED" a 6te trouve), sinon, le code de retour sera -2. 

Complement d'Information 

Pour plus de details sur BAN K MANAGER, reportez-vous au chapitre 7 et aux parties 13 et 14 
du chapitre 7 concemant les extensions residentes du systeme (RSX). 

Voici la fin de la parte 1 1 du Cours Hementaire sur le 464/6128 Plus. Vous connaissez desormais 
la plupart des touches du clavier, les commandes BASIC les plus simples, le formatage d'une 
disquette vterge pour sa preparation a 1'emploi et Pexecution des fonctions de base sur disquette 
comme : LOAD, SAVE, CAT, etc... ainsi que quelques commandes elementaires AMSDOS et 
CP/M. La parte suivante approfondit certains aspects de rinformatique etdu BASIC AMSTRAD. 

Bonne chance... et bonne lecture ! 
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Chapitre 2 

Passons aux choses sSrieuses... 



Vous avez lu maintenant le Coars 61ementaire et vous avez Pordinateur allume* 
ievant vous. Vous avez deja appris comment ex£cuter une operation plusieurs 
•ens en utilisant une boucle FOR NEXT et lui demander de v6rifier si (IF) une 
.-ondition est remplie pour qu'il execute alors (THEN) une instruction. 

^Mt vous devez en avoir assez de voir votre nom s'afficher sur toot Fecran et vous vondriez 
^rttenantcommencer afaire vraimentde I'informatique, utile ou amusaote. Vous trouverez dans 
t chapitre suivant la liste des mots-cl6s du BASIC AMSTRAD, accompagnes de tout ce qu'il 
•jot savoir sur leur "syntaxe' ' et leur fonction. Lorsque vous la possdderez a fond, votre ordinateur 
a vous ne connattrez d'autres limites que celles de votre i mag i nation. 

U c "est la premiere fois que vous servez d'un ordinateur, vous ressentirez quelques apprehension 
i ndee de "faire de la p^)g^ammation ,, . Rassurez-vous : e'est bien plus simple que vous oe 
maginez etcertainementmoins compliqud que les specialistes ne voudraient le faire croire avec 
cm jargon ! Dites- vous que le BASIC n'est pas une nouvelle langue a apprendre, mais plutot un 
jfttve" de l'anglais auquel, pour gagner du temps, on a ajoute quelques abreviations. CLS n'est 
ixc pas une formule magique, mais la forme abregee de CLear Screen ( Vide l'ecran). 

=^oc la penr du BASIC, vous serez bientot surpris de voir eomme il est agreable, apres quelques 
wmes de programmation, de recolter les premiers fruits de ses efforts. La programmation est un 
aocfce passionnant, surtout pour un debutant qui aborde un langage et une machine pour la 
pemiere fois. Souvenez-vous bien que, tant que vous n'ecrivez pas par inadvertance sur la 
^r f"* du systeme d'exploitation CP/M, rien de ce que vous entrez au clavier ne peut 
^Wnmag a- votre ordinateur. Aussi, n'h6sitez pas a innover ! 

Hals par ou commencer ? 

r«t souvent le debut d'un programme qui pose le plus de probleme au neophyte. Evitez surtout 
* vous jeter sur le clavier avant d'avoir reflechi a ce que vous voulez faire. 

•o» devez d'abord chercher a etablir, d'une part, ce que le programme est cense faire et d'autre 
jmu la maniere dont les resultats vous seront piesentes, c*est-a dire ce qui apparaltra a Pecran lors 
ie l'execution du programme. 

."oe fois ceci etabli, vous pouvez entamer ia redaction nrrjpfemeotditedu programme, en songeant 
3«itamment qu'il doit se derouler sans a-coups du debut a la fin avec un rrrniim ii m de sauts 
QOTO) en tous sens. Un programme bien ecrit doit se lire aisement; songez au casse-tfite qui 
*m attend lors de sa mise an point ou de son 'yebogage**, comme on dft dans le jargon 
afbrmatique. 
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Heureusement, le BASIC est un langage extrernement tolerant : il vous remettra souvent dans le 
droit chemin d'un simple message d'erreur affiche' a l'ecran. Si une idee vous vient apres coup, il 
ne fera aucune difficult^ pour inserer une nouvelle ligne entre deux ligoes existantes. 

Ecrlvons un petit programme 

Et maintenant, au travail ! Nous allons ecrire un programme permettant d'enregistrer le nom et le 
numero de vos amis. Ce sera le programme "Repertoire telephonique". Posons-nous d'abord tes 
deuxquestiomprimordiales; , ^uedoit-^faire? , ^et H commentlesresultatsseron^ilspr6sentes ?" 

Supposons que nous voulions un programme permettant d'enregistrer 100 noms et numeros de 
telephone. H suffira d'entrer au clavier le oom d'une personne donn£ pour obtenir aussitdt son 
niimero de telephone. Ce programme devra de plus etre capable d'afficher la liste de toutes les 
informations mernorisees, au cas ou nous aurions oublie sous quelle forme un nom a 6t6 enregisu*6. 
Vous remarquez que nous sommes deja en train de penser a la presentation des resultats. 

Tres bien, a vos claviers ! Commencons par le titre : 

10 REM repertoire teiephonique 

Dormer un titre n'est pas une obhgation. n vous aidera pourtant beaucoup a vous y retrouver 
lorsque vous aurez accumule' une quantity de programmes. 

Nous voulons done entrer (INPUT) une chataes de caracteres ( un nom ) dans une variable. Cette 
variable nous l'appellerons NOM$. De meme, nous aurons une variable pour les numeros de 
telephone, que nous appellerons TEL$. 

Vous vous souvenez que, dans les exemples du Cours Hementaire, l'instruction 1 N PUT vous avail 
perrais d'affecter une valeur a une variable. Ainsi, avec les lignes : 

20 INPUT "entrez le nom";NOM$ 

30 INPUT "entrez le numero de teiephone";TEL$ 

run 

Nous pourrons entrer un nom (disons "Paul"), puis un numero de telephone (par exemple 1 69 07 

0194) 

Ces informations sont maintenant stockees par le programme, mais nous n'obtenons encore aucun 
r6sultat a recran. n nous faut ecrire une partie de programme permettant de retrouver et d'afficher 
ces informations. Pour obtenir la valeur actnelle de NOM$ et TEL$, on aura recours aux 
instructions : 

PRINT NOM$ ...et.. PRINT TEL$ 

Mais attendez ! Nous avions bien dit qu'avec notre programme nous voulions enregistrer jusqu 'a 
100 noms et numeros de telephone ? Nous n'allons tout de mfime pas ecrire 100 instructions 
INPUT avec un nom de variable different pour chacune, puis 100 instructions PRINT pour 
afficher la liste a Tecran!!! Non, bien sur ; l'ordinateur resout ce probleme au moyen d'un 
instrument appele" "tableau". Le tableau permet d'affecter a une meme variable la "dimension" (le 
nombre de valeurs) desiree ( 100 dans notre cas). Pour connattre 1'une de ces valeurs, il suffit 
d'entrer le nom de la variable suivi ( entre parentheses ) du numero de references correspondant 
Ce numero s'appelle un "indice" et une expression telle que NOM$(27) s'appelle une 'Variable 



page 91 ChapHr»2 Passomauxchosesserieuses 



j riirte ". Nous sommes done en mesure, en utilisant une variable numenque x, dc travaUler sur 
Fememble des valeurs NOM$(x) de notre tableau : il suffit de faire prendre a xdes valeurs de 1 
i 100 dans une boucle FOR NEXT (FOR x=1 TO 100). Cbaque fois que xest augmente de 1, 
1'indke est egalement modifi6 et designs Felement suivant du tableau, un nom dans ce cas. 

Nous avoos besoin, pour les variables NOM$et TEL$,de deux tableaux de dimension 100. Avant 
d'utiliser un tableau, il faut declart sa DIMension. Remplacons done lignes 20 et 30 par ccs 
declarations. 

20DIMNOM$(100) 
30DIMTEL$(100) 

Nos variables ainsi deimies, ecrivons un programme permettant d'introduire les noms et numeros 
de telephone dans les tableaux ( nous verrons plus tard comment les retrouver). Ajoutons les 
lignes: 

40 FOR x-1 to 100 

50 INPUT "entrez le nom"; NOM$(x) 

60 INPUT "entrez le num6ro de t6l6phone";TEL$(x) 

70 NEXT 

run 

Tout cela est fort bien, mais nous n'avons pas l'intention d'entrer les 100 noms en une seule fois. 
De plus, la presentation du programme a Fecran laisse beaucoup a ddsirer. n s'agit maintenant 
d'y mettre un peu d'ordre. Pour commencer, nous allons, avant chaque nou velle entree, ddbarras- 
ser Fecran du texte anterieur devenu inutile. C'est Faffaire de F instruction CLS : 

45CLS 

Mais comment indiquer a l'ordinateur que, pour le moment, nous avons fini d'introduire des 
donnees ? Bien sur, on peut toujours arreter un programme en frappant la touche [ESC], mais 
alors nos precieux enregistrements seront effaces des que nous donnerons a nouveau Fordre 
RUN! 

n existe une meilleure solution : a chaque enregistrement d'un nouveau nom, demandons au 
programme de verifier si quelque chose a effectivement 6t£ frappe' au clavier, e'est-a-dire si 
NOM$(x) n'est pas une chalne vide, et demandons lui de s'interrompre dans le cas contraire. 
Avez-vous devin€ par quel biais ? Ecrivons : 

55lfNOM$(x)-" H THEN80 

80 PRINT "entree des donnees termtnee" 

Le programme doit lui-mfime indiquer a Futilisateur comment Finterrompre. Ajoutons done : 

47 PRINT "pour arreter appuyer sur [ENTER]" 
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Voyons maintenant comment obtenir rimpression des informations enregistrees, d'abord sons 
forme de liste. Ecrivons : 

SO FOR x-1 TO 100 

100 PRINT NOM$(x); " H ;TEL$(x) 

110NEXT 

Mais la encore le programme ne sait pas comment s'arreter avant le centieme element da tableau 
Ajoutons done : 

95IFNOM$(x)- n "THEN120 
120 PRINT "liste terminee" 

La chalne vide est d6tectee en ligne 95 et le programme interrompt rimpression en sautant le! 
Iignes100et110. 

Passons maintenant h notre objectif suivant : nous voulons que le programme soit capable di 
rechercher un nom entrfi au clavier. Ecrivons : 

130 INPUT "nom a trouver :":RECHERCHE$ 

140FORX-1TO100 

150IFlNSTR(NOM$(x),RECHERCHE$)-0THEN180 . 

1 SO PRINT NOM$(x); ,( ";TEL$(x) 

170 END 

180 NEXT 

1 90 PRINT "Ce nom n'est pas repertorie" 

run 

Une nouvelle instruction est apparue en ligne 150 : INSTR. Cette instruction demande i 
rordinateur de cbercher a 1'interieur de la premidre chalne citee, la premiere occurrence de h 
seconde chalne. Autrement dit, il va chercher dans NOM$ une occurrence de REGHERCHE2 
(la variable introduite en ligne 130, contenant le nom que vous recherchez). Si INSTR ne trouvi 
pas au moins une partie de cette chalne, elle foumira la valeur 0, ce qui dans notre programmi 
provoque un saut en ligne 1 80 et done une nouvelle tentative a vec la valeur suivante de x(NEXT) 
Si le programme a balaye" toutes les valeurs autorisees de x( 1 a 100), il peut alors atteindre h 
ligne 1&0 et annoncd qu'il n'a pas trouve" le nom demande". S'il le tfouve, INSTR fournit urn 
valeur differente de 0. Le programme passe alors sur la ligne 1 60, affichant le nom et le numen 
de telephone, avant de s'achever a la ligne 1 70 (END). 

Notre programme se perrectionne ties rapidement, mais il nous reste encore beaucoup i faire 
Prenonii done un peu de recul et considerons ses limites. La facon dont il se deroule, par exemple 
on enregistre les informations , puis on obtient une liste, et Ton peut enfin demander la recherchj 
o?unnomdonn6. 
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Et si Jamais? 

a si jamais cet ordre ne vous convenait pas ? Si vous p^Oriez conmieiK^r par la recherche d-un 
wan enregistre la veille, ou bien ajouter des noms et des numeros de telephone a ceux qui existent 
«* ? Btudier etresoudre ce typede probleme.c'est cela la programmation. BASIC, vous lesavez, 
Tto bome- de vous permettre l'insertion de nouvelles instructions dans un programme existent, 
ntm un bon programmeur ne doit pas se laisser surprendre. 

'Jn »tre inconvenient de taflle, tient au fait que le programme stocke le contenu des tableaux 
5ms one parte de la memoire efface a chaque nouvelle execution. Comme il est hors de question 
mt vous entriez a chaque fois toutes vos informations a la main, il faudra vous r6server la 
piflMlite, d'une part, de sauvegarder les valeurs des variables NOM$ et TEL$ avant d eteindre 
fowordinateur, et, d'autre part, de charger ces valeurs lors de l'execution du programme. 

fteponses 

void comment nous allons resoudre le proWeme du derailaiienttot&^tiioiisalloiisfaireen 
wrte qu'en d6but d'execution, le programme nous propose un choix entre les differentes opera- 
tons qu'il estcapable d'effectuer. Ce programme, detype "pilote par menu^afficbeeffectivement 
% lecran un menu des options proposees. Vous etes-vous deja servi d'un distributeur automatique 
* billets ? Si oui, vous avez deja eu affaire a un programme pilote par menu. Incorporons ce menu 
I iotie programme: 

32 PRINT "1 . ajouter un correspondent" 

33 PRINT "2. lister les correspondents" 

34 PRINT "3. consulter le repertoire" 

35 PRINT "4. sauvegarder le repertoire" 

36 PRINT "5. charger le repertoire" 

37 PRINT "votre choix (puis ENTER);ch 
38ONchGOSUB40,90,130 

85 RETURN . A , 

125 RETURN 
170 RETURN ( 
200 RETURN 

Comne vous pouvez le constatex, le programme affiche maintenant le menu des options, puis 

m oduit dans la variable ch le numero entre au clavier (INPUT). En passant sur rinstraction ON 

di GOSUB (ligne 38), il lancera le premier sous-programme (ligne 38) si ch=1 , le deuxieme 

i|ne 90) si ch=2 et ainsi de suite. 

ifcintenant que chacune des fonctions est devenue un sous-programme, il faut obUgatoirement 

a indiquer la fin par une instruction RETURN, ce que nous avons fait 

Vous souvenez-vous du mode d'execution de RETURN ? A la fin du ^-P">«ra^cette 

Mtroction BASIC renvoie le programme a la Hgne suivant immediatement rinstruction GOSU B 

anespoodante, c'est-a-dire dans notre cas, a la ligne srituee apres 38 (notre programme se 

joannivrait done a partir du point d'eutree des informations, ligne 40). Pour eviter cela, 

— ndnhnm la ligne : 
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39 GOTO 32 

. . afin de raire bouclerle programme sur raffichagedumemi. Fates encore touraerle programme 
pour coastater les ameliorations apportees. 

Parfait! Voyons maintenant comment notre programme se prtsente ( si celui-ci n'est pas arrets, 
faites [ESC] deux fois. Tapez : 

L| ST 

Et void oe que vous devriez avoir sous les yeux : 

10 REM repertoire tetephonlque 
20 DIM NOM$(100) 
30DIMTEL$(100) 

32 PRINT M 1 . ajouter un correspondanf 

33 PRINT "2. lister les correspondents" 

34 PRINT "3. consutter le repertoire" 

35 PRINT "4. sauvegarder le repertoire" 

36 PRINT "5. charger le repertoire" 

37 PRINT "voire choix (puis ENTER);ch 

38 ON ch GOSUB 40, 90, 130 

39 GOTO 32 

40 FOR x-1 to 1 00 
45CLS 

47 PRINT "pour arreter appuyer sur [ENTER]" 

50 INPUT "nom"; NOM$(x) 

55 If NOM$(x)-"" THEN 80 

60 INPUT "t6l6phone";TEL$(x) 

70 NEXT 

80 PRINT "entree des donnees terminee" 

85 RETURN 

90 FOR x-1 TO 1 00 

95IFNOM$(xK"THEN120 

100 PRINT NOM$(x); " M ;TEL$(x) 

110 NEXT 

120 PRINT "llsteterminee" 

125 RETURN 

130 INPUT "nom atrouver :":RECHERCHE$ 

140 FOR x-1 TO 100 

150 IF INSTR(NOM$(x), RECHERCHE$)-0THEN 180 

160 PRINT NOM$(x);" ";TEL$(x) 

170 RETURN 

180 NEXT 

190 PRINT "Ce nom n'est pas repertorie" 

200 RETURN 
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Vous remarquez qu'a certains endroits nous commencons a manquer de place pour inserer de 
■ouvelles Ugnes. Nous allons eo creer et remettre un peu d'ordre en RENUMerotant lea limes 
Faites : 

RENUM 
UST 

Vous devez maintenant obtenir : 

10 REM repertoire telephonlque 

20DIMNOM$(100) 

30DIMTEL$(100) 

40 PRINT "1 . ajouter un correspondanf 

50 PRINT "2. lister les correspondents" 

60 PRINT "3. consulter le repertoire" 

70 PRINT "4. sauvegarder le repertoire" 

80 PRINT "5. charger le repertoire" 

90 PRINT "votre choix (puis ENTER);ch 

1 00 ON ch GOSUB 40, 90, 1 30 

110 GOTO 40 

120 FOR x-1 to 100 

130 CLS 

140 PRINT "pour arreter appuyer sur [ENTER}" 

150 INPUT "nom"; NOM$(x) 

160 If NOM$(x)-"" THEN 190 

170 INPUT "teiephone M ;TEL$(x) 

180 NEXT 

1 90 PRINT "entree des donnees terminee" 

200 RETURN 

210 FOR x-1 TO 100 

220IFNOM${xK"THEN250 

230 PRINT NOM$(x); " H ;TEL$(x) 

240 NEXT 

250 PRINT "liste terminee" 

260 RETURN 

270 INPUT "nom a trouver : n :RECHERCHE$ 

280 FOR x-1 TO 100 

290IFINSTR(NOM$(x),RECHERCHE$)-0THEN320 >v*j 

300 PRINT NOM$(x); M ";TEL$(x) ■ >A 

310 RETURN 

320 NEXT 

330 print "Ce nom n'est pas repertorfe" 

340 RETURN 

vofla qui est mieux. Continuons ! D nous faut maintenant une instruction qui fera en sorte que 
^aque nouvelle information enregistree soit rangee a l'interieur de la premiere case vide 
iisponiole dans le tableau. Nous allons pour cela nous servir d'une nouveUe instruction • LEN 
^iic-ci permet de calculer la longueur d'une chalne. Voici ce qu'il faut indiquer a roriinateur ■' 
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Si rlR la loneueur (LENgth) de NOM$(x) est superieure a 0, autrement dit si cette carte est deji 

case saivante). 

Nul besoin, on le voit, d'etre done en anglais pour parler BASIC. Toutefois, c'est avant tout une 

question de bon sens t 

1351FLEN(NOM$(x))>0THEN 180 

Enfantin n'est-ce pas ? Avec voire liste des mots-cies de BASIC, et un pen de rafcxwn, £ame 
SfS ne^ounJ vous arreter. Vous trouverez toujours une instruction ^P^^f** 
a^be1oLv!avecrhabitude,les solutions vous viendront a 1'espnt comme par miracle. 

Vovons maintenant comment sanvegarder les valeur des variables afin de pouvoir ^J^*** 
Sn^cTunpmgrarame. Vo a >m*^*^«^*£*%^ % 
neut sauvegarder le programme lui-meme au moyen de Instruction S A^ *™*^? 

nTsra^n'eW 

^fa^laS fc pTogramrnT^VE), vous conserves ce cadre, mais pas les valeurs elles- 

memes. 

Une partie du programme devra done prevoir le stockage des valeurs sur disquette. Nous allons 

pour cela creer "un fichier de donnees" independant 

nfaudrad'abordo U vrir(OPEN)unfichierde^ 

"donnees", puis ecrire (WRITE) a l'interieur de ce fichier les valeurs (de 1 a 100) ^variables 

N«e^L(x)eip^ 

section sera placee a partir de la ligne 350. Laissons a 1'instruction : 

AUTO 350 

. . .le soin de numeroter AUTOmatiquement les lignes : 

350 OPENOUT "donnSes" 

360 FOR x»1 TO 100 

370 WRITE #9, NOM$(x), TEL$(x) 

380 NEXT 

390 CLOSEOUT 

400 PRINT "donn6es sauv6es" 

410 RETURN 

Une fois la ligne 410 validee par [RETURN], faites [ESC] pour mterron^ U fflmierotation 
AUTOmatique. 

Nous venous d'introduire une option supplemental : il I not* ; faut done ajouter »ntoto 
la liste situte apres 1'instruction ON ch GOSU B , ligne 1 00. Rappelons la hgne 1 00 pour operer 
cette modification, par EDIT : 

100 ON ch GOSUB 120, 210, 270, 350 
Vous pourrez desormais, en choisissant l'option 4, demander au programme de stacker sur 
disquette les informations introduttes. 
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Vous remarquerez qu 'en ligne 370, oil le programme ecrit sur la disquette les valeurs dc NOM$(x) 
et de TELfx) le mot-cK WRITE est suivi de l'expression #9. Le symbole # est un "seiecteur de 
canal" qui indique a 1'ordiDateur sur quel canal les donnees doiveut fttre a che m i n ees. n en existe 
10 dans un otdinateur : 

Si Ton dirige les donnees sur les canaux a 7 (de HO a #7), celles-ci apparaissent sur l'ecran (les 
canaux a 7 sont r6serv6s pour l'ecran et y d6finissent des "fenetres'XWINDOW)). 

Les donnees envoyees sur le canal #8sortiront sur l'impriniante, le cas ecbeant . - i J 

Enfin, les donnees dirigees sur le canal #9 seront envoyees a l'unite de disques : c'est ce que son 
avons fait ligne 370. 

Une petite digression... 

Juste un mot sur l'instraction AUTO que nous venons d'utiliser. Lorsque Ton entre, sans numero 

de ligne, l'instruction : 

AUTO 

. . , rordinateur se met a numeroter automatiquement les Hgnes, en commencant a 10, et en 
progressant de 10 en 10 a cbaque nouvelle ligne entree. Si les lignes 10, 20, 30, etc. existent deja 
dans votre programme, vous les ferez apparaltre sur l'ecran une a une en actionnant la touche 
(RETURN]. Cette procedure peut vous faire gagner du temps lorsque vous desirez corriger toute 
une sequence de lignes espacees de 10 en 10. 

Revenons a notre programme... 

Aprfes avoir ecrit les instructions permettant le stockage de nos donnees sur disquette, il ne nous 
reste plus qu'a en prevoir le cbargement, pour que notre programme soit termini. Ajoutons done 
me nouvelle option au menu en corrigeant encore une fois la ligne 100. 

100 ON ch GOSUB 120, 210, 270, 350, 420 

Voyons maintenant les instructions de cbargement U faudra d'abord ouvrir (OPEN) le fichier 
s:tree (INput) sur la disquette ou cassette de "donnees", puis cbercber a partir de cette disquette 
canal #9) toutes les valeurs, de 1 a 100, des variables NOM$(x) et TEL$(x), et enfin refermer le 
'xMer avant de revenir au menu. Voici la procedure : 

420 OPENIN "donnees" 

430 FOR x-1 TO 100 

440 INPUT #9, NOM$(x), TEL$(x) ■-■■■-... , . =-. * .. i ,^, :; ....,-.,. . .-,,.-. % 

450 NEXT 

460 CLOSEIN 

470 PRINT "donnees chargees" 

480 RETURN 

i^jpelez-vous que si vous avez un 464, vous aurez a rembobiner la cassette avant de recharger 
a donnees. 
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La fin du commencement.. 

Le programme que nous venoos d'ecrire rempUt maintenant tons les objectifs que nous avion* 
fixes au depart lorsqiie nous nous demandions "ce qu'il devrait faire". n ne nous reste plus qu'a 
ameiiorer la "presentation des resultats" a l'ecran. 

Et le commencement de la fin... 

D'abord quelques instructions pour mettre le programme an propre : 

34 MODE 1 

Ceci determine le mode d'affichage : l'ecran sera efface a chaque nouvelle execution du 
programme. Ecrivez ensuite : 

36 WINDOW #1,13,30,10,14 

Cette instruction un peu obscure ne doit pas vous effrayer : elle consiste simplement a dessiner 
sur l'ecran une petite fenetre pour encadrer lemenu. Le code situe" apres le mot WINDOW indique 
a l'ordinateur sur quel canal cette fenetre sera dirigde ( souvenez- vous que nous en avons 8 a notre 
distribution, de #0 a #7). Sachant de plus que l*ordinateur, s'il n'a pas recu d'indication 
particuliere, choisit automatiquement le canal #0, on voit bien qu'il faut eviter de dinger notre 
petite fenetre sur ce canal, sous peine de voir s'y afficber toutes les parties du programme. II faudra 
done cboisir un autre canal entre #1 et #7, d'ou l'indication #1 sur notre exemple. Les quatre 
nombre qui viennent ensuite indiquent, de maniere on ne peut plus simple, les dimensions de la 
fenetre : ils donnent la position des bords gauche, droit, supeneur et inferieur de la fenetre, en se 
referent aux numeros de colonnes et de hgne de l'ecran (comme pour I'instruction LOCATE). 
Ainsi dans notre exemple, apres avoir precise que nous utilisions le canal 1 , nous declarons que 
le bord gauche commence en colonne 7, que celui de droite flnit en colonne 36, que le bord 
supeneur commence en ligne 1 et que le bord inferieur finit en Hgne 14. 

Si nous voulons maintenant que le menu s'affiche dans cette fenetre, il va nous faUoir rectifier les 
Iignes40a80: 

40 PRINT #1 , "1 . ajouter un correspondanf 
50 PRINT #2, H 2. lister les correspondarrts" 
60 PRINT #3, "3. consulter le repertoire" 
70 PRINT #4, "4. sauvegarder le repertoire N 
80 PRINT #5, "5. charger le repertoire" 



page 99 Chapitre 2 Passons aux choses serieuses 



Ajootons encore la ligne : :i?n 

85 LOCATE 7, 25 

Cette instruction sert a positionner sur l'ecran la demande de 1'option choisie. La presentation sera 
ainsi plus claire. 

Vidons maintenant l'ecran de son contenu avant chaque retour au menu : 

110 GOTO 34 
. . .et apres chaque selection d'option : 

95CLS 

Ajoutons pour finir les trois lignes suivantes, qui metrront roidinateur en attente avant de revenir 
aumenu : 

103 LOCATE 9,25 

1 05 PRI NT "appuyer sur une touche pour le menu" 

107IFINKEY$=""THEN107 

La ligne 103 indique l'endroit auquel rordinateur devra afficher le message contenu en ligne 1 05. 
La ligne 107 cberche quelle chalne de caractere vient d'etre entree au clavier (INKEY$). Si (IF) 
ctUe-ci est vide, c'est-a-dire tant que l'utilisateur n'aura pas actionne" une toucfae quelconque du 
clavier, alors (THEN) le programme bouclera sur cette instruction. Cette instruction a bien pour 
cffet de mettre le programme en attente : celui-ci attend effectivement qu'une touche soitenfoncee 
pour passer a la ligne suivante. 

Le voila done termine, ce programme ! Termine, vraiment ? Vous pourriez encore lui demander 
ic corriger ou d'effacer des norns ou des numeros de telephone, de trier la liste dans l'ordre 
ilphabCtique, ou de vous la "sortir" sur imprirnante, ou bien encore si vous fetes trfes ambitieux, 
d'emettre des signaux permettant d'appeler automatiquement votre correspondant en entrant 
{implement son nom au clavier, non sans avoir, bien entendu, demande" aux FIT 1'autorisation de 
connecter votre ordinateur sur le poste telephonique ! Ces perfectionnements sont pourtant de 
l'ordre du possible. A vrai dire, on peut amdliorer et peaufiner ainsi ses programmes a 1'infini, 
surtoutlorsque l'on dispose d'un outil mformatique aussi puissant que le 464/6128. nfaut pourtant 
avoir s'arrfeter et nous allons laisser ce ' "repertoire telephonique 1 ' a ce point en esperant que vous 
en avez desormais un peu plus sur 1 'art d'6crire un programme en partant de zero, n ne vous reste 
qo'a le remettre un peu en ordre en tapant une demifere instruction : 

RENUM 

puis a le stacker sur disqnette, ou vous en dfebanasser. Mais qui ait flpomraitpeut-elre vous fetre 
*ile...pour noter les numeros de telephone de vos amis. 
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Void votre programme termin6 : 

10 REM repertoire telephonique 
20DIMNOM$(100) 

40 MOD T E E 1 L 50 WINDOW #1,13,30,10,14 60 PRINT #1,-1. ajouter un correspon- 

dant " „ .*... 

70 PRINT #1 ,"2. lister les correspondents 
80 PRINT #1 ,"3. consulter le repertoire" 
90 PRINT #1, "4. sauvegarder le repertoire" 

1 00 PR I NT #1, "5. charger le repertoire" „-——,* 

110 LOCATE 7,25 120 PRINT "votre choix (puis ENTER);ch 

130 CLS 140 ON Ch GOSUB 190,290,350,430,500 

150 LOCATE 9,25 1 60 PRINT "Pressez une touche pour afficher le menu i ru 

IF INKEY$- ,m THEN 170 180 GOTO 40 

190 FOR x-1 to 100 

200 CLS _^ icm 

210 IF LEN(NOM(x))0 THEN 260 220 PRINT "pour arreter appuyer sur [EN- 

TERT 

230 INPUT "nom"; NOM$(x) 
240KNOM$(x)-""THEN80 
250 INPUT "telephone";TEL$(x) 

260 NEXT 

270 PRINT "entree des donnees termlnee" 

280 RETURN 

290FORx-=1TO100 

300IFNOM$(x)=""THEN330 

310 PRINT NOM$(x); " ";TEL$(x) 

320 NEXT 

330 PRINT "liste terminee" 

340 RETURN 

350 INPUT "nom atrouver :":RECHERCHE$ 

360 FOR x-1 TO 100 

370 IF INSTR(NOM$(x), RECHERCHE$)-0 THEN 400 

380 PRINT NOM$(x); M ";TEL$(x) 

390 RETURN 

400 NEXT 

410 PRINT "Ce nom n'est pas repertorfe" 

420 RETURN 

430 OPEN OUT "donnees" : - *-"- - rr ' ! :; "■' ■''■ 

440 FOR x-1 TO 100 

450 WRITE #9, NOM$(x)TEL$(x) 

460 NEXT 

470 CLOSEOUT 

480 PRINT "donnees sauvees" 

490 RETURN 

500 OPENIN "donnees" 
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510 FOR x-1 TO 100 

520 INPUT #9, NOM$(x),TEL$(x) 

530 NEXT 

540CLOSEIN 

550 PRINT "donnees chargees" 

560 RETURN 

run 
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Chapitre 3 : 

Liste complete des mots cles du 

BASIC AMSTRAD CPC 464/6128 



IMPORTANT 



V assimilation de la terminologie etde la notation adoptees 
dans ce chapitre est indispensable. Differents types de paren- 
theses expliquent V entree des commandes ; commencez done 
par vous familiar is er avec la signification de chacun. 

Lea commandes sans crochets doivent rester telles quelles. C'est le cas par exemple, de la 
cemmande: 

END 

. . .et vous devez taper le mot END en toutes lettres. 

Lorsqu'un Element apparalt entre parentheses angulaires, <> comme : 

<numero de ligneo 
...signifie que vous devez taper: 

EDIT 100 
L« parentheses ( ) doivent etre tapees telles quelles. Dans l'exemple : 

COS (<expression numeriquO) 
. . ^'expression numerique doit se trouver entre parentheses. Par exemple : 

PRINT COS (45) 

Les crochets, pour finir , contiennent les elements facultatifs d'une commande ou d'une fonction. 

Par exemple: 

RUN [<numero de ligne>] 
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. . . signifie que vous n'etes pas oblige" de faire suivre le mot cle RUN d'un parametre, mais que 
vous pouvez, si vous le oVSsirez, ajouter le parametre <numero de ligno. La commande pent alors 
etre entree de deux manieres : 



RUN 

...on.... 

RUN 100 ,.,,.,„.. ._.=-^,, : ,. 

Caracteres sp6claux v - * * T ^ 

&ou&H Prefixe poor on nombre hexadecimal 

&X Prefixe pour un nombre binaire 

# ftefixe pour un canal d'entrees-sorties 

Types de donnees 

les cbalnes peuvent avoir de a 255 caracteres et sont designees par <cbatae alpbanumerique>. 
On peut adjoindre une cbatne a une autre avec le signe + et a condition que la chame qui en resulte 
ne depasse pas 255 caracteres. 

Les donnees numdriques peuvent etre soit des entiers ou des nombres reels. Les entiers varient de 
-32768 a +32767 et les nombres reels de -1.7E + 38 a +1.7E + 38, le plus petit nombre au dessus 
de zero etant 2.9E-39 et chaque nombre ayant 9 a 10 cbiffres significatifs. 

Une <expression numexiquo est une expression qui aboutit a une valeur numerique. cela peut 
etre des nombres, ou une variable numerique, ou des nombres operant avec des variables 
numeriques, a peu pres tout ce qui n'est pas <chatne alphanumenque>. 
Un <numero de canal> se rapporte a une <expression numenquo pour designer une fenetre 
d'ecran, une imprimante, une cassette ou une disquette vers laquelle le texte doit etre achemine. 

Une <liste de:element> decrit un parametre comprenant une liste d'Clements separes par des 

virgules. Cette liste, pouvant contenir un ou plusieurs elements, est limitee par la longueur de 

ligne. 

Les differents indicateurs de type de donnees : 

% Entiers * 

! Reels (par defaut) 

$ Cnalne alphabetique et numerique (alpriammieriqoe) 

Nous aUons dormer les mots des du BASIC AMSTRAD sous la forme suivante : 
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Mot c!6 

Syntaxe 

Example 

Description 
Mots ctes assocfcs 

Les mots <Ms soot : 

DES COMMANDES : 
DES FONCTIONS : 
DESOPERATEURS: 



:->Vfr>ii 



operations executees directement 
operations intervenant dans une expression 
agissent sur des arguments mathematiques. 



Lots du listage d'un programme, le BASIC transforme en MAJUSCULES tous les mots ctes tap6s 
en minuscules. Les exemples de ce chapitre sont en MAJUSCULES tels qu 'ils apparaissent apres 
m USTing. n sera toutefois preferable que vous les tapiez en minuscules car les mots cles 
cootenant une erreur resteront LIST6s en minuscules, vous revelant ainsi vos erreurs de frappe. 






motscMt 
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Mots cl6s 

ABS 

ABS (<expression numenque>) .*'■ 

PRINT ABS (-67.98) 
67.98 

FONCTTON : Donne la valeur ABSolue dc Pespfeasion entre parentheses. Les nombres negatifs 
perdent done leur signe moins. 

Mots cles assoctes : SGN 

AFTER 

AFTER <d#ai du chronometre>[,<numdro de chronometre>] GOSUB <numero 
deligne> 

10 AFTER 250 GOSUB 60:CLS 

20 PRINT "Devine une lettre en 5 secondes" 

30 a$-INKEY$:IF flag-1 THEN END 

40 IF a$oCHR$ (INT (RND*26+97)) THEN 30 

50 PRINT a$; "est exacte. Tu as gagne !" 

55 SOUND 1 ,478:SOUND 1 ,358:END 

60 PRINT Trap tard J'ai gagne I" 

70 SOUND 1 ,2000:flag«1 : RETURN 

run 

COMMANDE : Appelle un sous-programme apres (AFTER en anglais) un certain dflai.Le<deTai 
du chronometre> indique la duree de l'attente en multiples de 0,02 seconde. Le <numero de 
chronometre> (qui peut etre 0, 1, 2 ou 3) precise lequel des quatre chronometres d'attente il faut 
utiliser. 

Chacun des 4 chronometres peut etre assocte a un sous-programme. Pour plus de details conceroant 
les interruptions, reportez-vous a la partie 2 du chapitre "A vos heures de loisir... " 

Mots cles associes : EVERY, REMAIN, RETURN 
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AND ij;>»iJ-X:- .-.'.iiiiU.-. 

<argumerit>AND<arguriient> , M 

IF "alaln" < "bemard" AND "chien" > "chat" THEN PRJNT "vraT ELSE PRINT 

laux" 

vrai ** 

IF "bernarcf < "alain" AND "chaf >*chlen" THEN PRINT faux 

IF "alaln" < "bemard" AN D "chat' > "chien" THEN PRINT faux ** 



PRINT 1 AND 1 

1 

PRINT AND 



PRINT 1 AND 



OPERATEUR : Execute les operations booleennes par bits sur des nombres entiers. Est egal a 
sauf lorsque les deux bits d 'arguments sont egaux a 1 . 

Pour toute information complementaire sur la logique, consultez la partie 2 du chapitre "A vos 
hcures de loisirs..." 

Mots associes : OR, NOT, XOR. 

ASC 

ASC (<chame alphanum6rique>) 

PRINT ASC ("X") 
120 

PONCTION : Donne la valeur numenque du premier caractere d'une chalne de caracteres. 
Motscles associes : CHR$ 

ATN 

ATN (<expression num6rique>) 

PRINT ATN (1) 
0.785398163 

PONCTION : Calcule l'Arc TaNgente (rtdukant l'<expression num6rique> i un nombre rtel en 
•adians). 
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A noter ; lei commaiides DEG et RAD peuvent fctre utilisees pour specifier expticitement que le 
resultat sea exprime' respectivement en degres ou radians. 

Mots elds associes : COS, DEG, RAD, SIN, TAN 

AUTO 

AUTO [<numero de ligne>][,<incr6ment>] 

AUTO 100,50 

COMMANDE : Genere AUTOmatiquement les numeros de ligne. Le parameUe racultatif 
<numero de ligne> doune le premier numdro de ligne a generer. Si vous ne le precisez pas, les 
lignes sont gdnerees a partir de 10. 

L'<iner6ment>, egalement facultatif, fixe l'intervalle entre les numeros de ligne. En 1'absence de 
specification, il sera egal a 10. Si un numero de ligne deja utilise est gendreV le contenu de cette 
ligne apparatt a l'ecran etpeute"ventuellementfttremodifi6; La ligne afficbeeestensuite remplacee 
en memoire apres activation de la touche [RETURN]. Pour arreter la numerotation automatique 
des lignes, appuyez sur [ESC]. 

Mots cles associes : Aucun 

BIN$ .* 

BIN$ (<nombre entier sans signe>[,<nombre entier>]) 

PRINT BIN$ (64,8) 

01000000 ._..„,.... . 

FONCITON : Produit une cbalne de chifrres BINaires representant la valeur du <nombre entier 
sans signo, a 1'aide du nombre de chifrres binaires indiqufe par le deuxieme <nombre entier> 
(entie et 1 6) . si ce nombre est trop grand, le rgsultat commence par autant de zeros que necessaire. 
S'il est trop petit, le resultat n'est pas tronque mais converti en autant de chifrres que necessaire. 

Le <nombre entier sans signo a convertir en binaire doit etre compris entre -32768 et 65535. 

Mots cles associes : DEC$, HEX$, STR$ 



i nataerr- ■ 
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BORDER 

BORDER <numero de couleur>[,<numero de couleur>] ?* "' 

1 REM 729 combinaisons de bordure 

20 SPEED INK 5,5 

30 FOR a-0 TO 26 

40 FOR b-0 TO 28 

50 BORDER a,b:CLS:LOCATE 1 4,13 

60 PRINT B border";a;Y;b 

70 FOR t-1 TO 500 

80NEXTt,b,a 

run 

COMMANDS : Pour changer la couleur de la bordure d'ecran. Si deux couleurs sont indiquees, 
dks ahement a la vitesse determined par la commande SPE ED I NK, le cas echeant Les valeurs 
«*Bde0a26. 

%fc*s cles associes : SPEED INK 



BREAK 

. o» ON BREAK CONT, ON BREAK GOSUB, ON BREAK STOP) 



CALL 

CALL <adresse>[,<liste de:<parametre>] 

CALL0 

^i#4ANDE:Pennetaun sous-programme externed'ftlrcappele' apartirdu BASIC. L'exemple 
*■ «m reinitialise completement rordinateur. 

* aftKT tree precaution. 

mm tM* modes :VHT 



des 
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avant d'utiliser cette commande, vous pouvez specifier le parametre <ensemble de lignes> dc la 
commande DELETE. 

Les numeros de Ugne du programme initial idermques a ceux du programme a rusfonner seront 
ecrases sur les nouvelles Ugnes. 

Les fichiers proteges (sauvegardes par la commande SAVE,p) ne peuvent PAS etre fusionnes par 
cette commande. 

464 : Vous n'avez pas besoin de specifier le com du fichier si vous desirer charger le premier 
fichierde la cassette. 

On vous demandera de : 

Appuyer sur PLAY puis sur iroe touche i,w 

. . . apres quoi, vous devrez appuyer sur la touche PLAY de votre lecteur de cassette, puis sur ime 
des touches de 1* ordinateur. La bande de la cassette se deroulera a mesure que rordinateur chargera 
te fichier a traitor. 

L'ecran affichera les messages de chargement : 
Loading NOMFICH block 1 

. . . et autant de fois qu'il y a de numeros de Woe dans le fichier, jusqu'a ce que le fichier soft 

charg6. 

Si le nom de fichier commence par !, les messages ci-dessus sont supprim6s et vous n'avez pas a 

actionner de touche pour charger le fichier (assurez-vous toutefois que la touche PLAY de votre 

lecteur de cassette est bien enfoncC). Si vos programmes font appel au point d'exclamation! et 

doiventaussi toumer surdisquette, le ! estignort lorsderexploitation sur disquette). Le ! n'occupe 

pas un caractere dans les noms de fichiers sur cassette ou disquette. 

Lefaitde sortirde la commande en utilisant la touche [ESC] produit le message d'erreur sulvant: 

Broken in 
Mots cles associfo : CHAIN, DELETE, LOAD, MERGE 

CHR$ 

CHR$ (<nombre entier>) 

1 FOR x-32 TO 255 «■ . AO 

20 PRINT x;CHR$(x), 

30 NEXT -.T-sfsl;.-; -'& 

run 
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PONCnON : Convertit un <nombre eatier> compris entic et 255 en une chalne de caracteres 
equivalente a Paide du jeu de caracteres de P AMSTRAD , decrit dans la partie 3 du chapitre "Ponr 
information...". Les caracteres a 31 sont des caracteres de contr&le. C'est pourquoi Pexemple 
ti-dessus affiche les entiers compris entre 32 et 255. 

Mots cles associes ; ASC 

_____ ■:■■' u, 4*o«i y-> ■&;-. .,, £ sakasr :■' ■ 

CINT :ms 

CINT (<expression numerique>) 

10n-1.9999 

20 PRINT CINT (n) $0 

run 



PONCnON : Convertit une valeurnumenq^ decimate en unentier arrondi compris entre -32768 
et 32767. 

Mots cles associes : CREAL, FIX, INT, ROUND, UNT 



CLEAR 

CLEAR 

COMMANDE : EffiKX toutes les variables, fidriers ouverts, tabteaox et fooctioos otilisatear, le 
raode de calcul en BASIC s'effectue en radians. 

Mots cles associes : Aucun 

CLEAR INPUT 

CLEAR INPUT "*-■ 

10CLS s ' 

20 PRINT "tapez plusjeurs tettres maintenant !" 

30 FOR t-1 TO 3000 

40 NEXT isbrau 

50 CLEAR INPUT 

COMMANDE: Efface toutes tea donnees entrees a partirdu clavier, se tronvant dans le tampon. 

: *our experimenter cette command©, lancez le progranBne ci-dessus et tapez les lettres lorsque 
mm y etes invite. Supprimez ensnite la ligne 50 dn programme, relancez-le et voyez la difference. 

Mots cles associes : INKEY, INKEY$, JOY 
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CLG 

CLdl<encrc>] 

LOCATE 1,20. ^ 
CLG 3 

COMMANDS : efface recran graphique et le ramene a sa couleur de fond Si <encre> est 

specifiee, le fond est la couleur fixee en accord. 

Mots cles associes : CLS, GRAPHICS PAPER, INK, ORIGIN 

CLOSEIN 

CLOSEIN 

CLOSEIN 
COMMANDE : Ferine tout fichier d'entrfe ouvert sot la disquette (voir OPEN1N). 
Mots cles associes : EOF, OPENIN 

CLOSEOUT 

CLOSEOUT 

CLOSEOUT ^*'^ 

COMMANDE : Ferme tout fichier ouvert en sortie sur la disquette. (Voir OPENOUT) 

464 : Si le buffer fichier est presque plein et que la commande CLOSEOUT est rencontree, 
1'ordinateur sauvegardera le contenu du buffer fichier sur la cassette, et affichera le 
message: 

Press R EC and PLAY then any key : 
L'ecran affichera le message de sauvegarde : 

Saving FILENAME BLOCK (x) 
Si le premier caractere du nom de fichier de la commande correspondante OPENOUT est I 

les messages ci-dessus sont supprime's et vous n'avez pas a actionner de touche pour sauver le 
fichier (assurez-vous toutefois que les touches RECORD et PLAY de votre lecteur de cassette 
sont bien enfoncees). Si vos programmes font appel au point d'exclamation! et doivent aussi 
tourner sur le disque, le ! sera ignoree pendant les acces au disque Oors de l'exploitation de la 
disquette). le ! n'occupe pas un caractere dans les noms de fichiers sur cassette ou disquette. 
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Lc fail de sortir de la commande en utilisant la touche [ESC] produit le message d 'eneur suivant : 

Broken in 
mots cles assodes : OPEMOUT 



CLS 

CLS [#<num6ro de canal>] 

10 PAPER #2,3 
20 CLS#2 
run 

COMMANDE ; Efface la fenfttre d'ecran specifiee par le <numero de canal> et lui donoe sa 
couleur de papier. En r absence de <numero de canal>, est pris par defauL 

Mots cl6s associes : CLG, INK, PAPER, WINDOW 



CONT 

CONT 

CONT 

COMMANDE : CONTimie 1'execution du programme apres un stop, ou deux activations de la 
wicne [ESC] si le programme n'a 6t6 ni modifi£ ni protegl. Des commandes directes peuvent 
tee tapees avant reprise du programme. 

Mots cles associes : STOP 



COPYCHR$ 

COPYCHR$ (#<stream expression) 

10 CLS 

20 PRINT "coin superieur" 

30 LOCATE 1,1 

40 a$-COPYCHR$ (#0) 

50 LOCATE 1,20 

60 PRINT a$ 

run 

PONCTION : Copie un caractere a partir de la position du curseur dans le canal (qui DOIT etre 
specifi6). le programme ci-dessus copie un caractere de l'emplacement 1,1 (angle superieur 
pucfae) et le reproduiten 1 ,20. Si le caractere lu n'est pas reconnu, une chalne nulle est renvoyee. 

J4ottcles associes : LOCATE 
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COS 

COS ^expression numenque>) 

Ti "■'"-.■ ;* ; >'- '■'Stoat 

DEG 

PRINT COS (45) 
0.707 106 781 

FONCIION : calcule le COSinus de r<expresaion numenquo 

DEG et RAD peuvent servir a exprimer rargument en degres ou en radians, respectivement 

Mots ctes associes : ATN, DEG, RAD, SIN 

CREAL : <««saw:' •■•»&> M -mi *&&a^.*as&~ 

CREAL (<expression numenque>) 

10a-PI 

20 PRINT CINT (a) 

30 PRINT CREAL (a) ' r * " 

run 

3 
3.14159265 

FONCTION : Convertit l'expression numerique en nombre reel 
Mots cles associes : CINT 

CURSOR 

CURSOR [<indicateur systeme>][,<indicateur utilisateur>] 

10 CURSOR 1 
r-fi 20 PRINT "question ?"; 

30 a$-INKEY$ : IF a$-"" THEN 30 
40 PRINT a$ 
50 CURSOR 
run 

COMMANDS : Active ou desactive l'indieateur systeme ou utilisateur. Les parametres <indica- 
tei»systeme>et<mmcateurutilisateur>dofr^ 1 (acttf).Danslacommande 

1NKEYS ci-dessus, le curseur a ete" rendu visible par fixation de l'indicateur systeme sur 1 (a la 
Ugne 10). 

Le curseur s'affiche lorsque les deux indicateurs sont sur 1 . 

Le curseur systeme est automatiquement active^ pour la commande INPUT et desactive - pour 

INKEY$. 
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II est preferable de desactiver le curseur pour affichage d'un texte a Tecran, -4^$- 

Vous pouvez omettre l'un des indicateurs mais pas les deux. Si un parametre est onus, son 6tat 
est inchangd. 

Mots cl6s associes : LOCATE 



DATA 

DATA <Uste de:<constante> 

10FORX-1TO4 ha. 

20 READ nom$,pr6nom$ 

30 PRINT'Mr. w ;nom$;" ";prenom$ ■ : *-- - 

40 NEXT, 

50 DATA DUPONT, Olivier, DURAND, Franpofe 

60 DATA LAMIE, Fr6d6ric, MOULIN, Daniel. - : A 

run 

COMMANDE : Declare des donnees constantes a rinterieur d'un programme, ces donnees 
peuvent etre affectees a une variable par la commande READ, apres quoi le pointeur passe a 
I'elernent suivant de la liste DATA. La commande RESTORE peut servir a deplacer le pointeur 
sur une position specified de DATA. 

Pour de plus amples informations, consultez la partie 2 du chapitre "A vos beures de loisir...". 
Mots cite assories : READ, RESTORE 

DEC$ 

DEC$ (Expression numenque>, <modele de format>) 

PRINT DEC$ (1 0T7,"££###### r .##") 
£10,000,000.00 

PONCTION : Donne une representation DECimale de rexpression numerique, utilisant le 
<modele de format> indiqud. 

Le modele de format ne peut contenir QUE lea caractfe re g : 
+ -£$*#, .T 

remploi de ces <indicateurs de format> est dficrit au mot cle" PRINT USING. 
Mots elds associ&s : BIN$, HEX$, PRINT USING, STR$ 
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DEFFN 

DEF FN < nom de fonction> [(parametres formels>)] = <expression> 

10t-TIME/300 

20 DEF FNchrono-INT (TIME/30(M) 

30EVERY100GOSUB50 

40 GOTO 40 

50 PRINT "Le programme toume depute "; 

60 PRINT FNchrono;"secorKles" 

70 RETURN 

run 

COMMANDE :Le BASIC pcnnetau programme deDEFurirune FoNctionretournantune valeur 
unique et de l'utiliser. DEF FN est la partie definition du mecanisme de creation d'une fonction 
specifique, iravaillant d'une manifere sirnilaire aux fonctions existantes du BASIC (COS, SIN, 
ATN,etc). 

(Dans l'exemple ci-dessus la valeur de la fonction FNchrono est constamment mise a jour, mfime 
si le programme est suspendu par [ESC] ou antte" par double [ESC], puis relanc6. 

Mots cles associes : Aucun 



DEFINT ..,.^b Br , 

DEFINT <liste de:<lettres concem6es> 

10 DEFINT n 
20 nombre-1 23.456 
30 PRINT nombre 
run 

123 

COMMANDE : ddfinit le type de variable par DEFaut, le type etant entier. Lorsqu'une variable 
intervient sans marqueur (! % $), le type par deTaut est automatiquement mis en oeuvre. Cede 
commande d6finit le type par detaut des variables selon la premifere lettre du nom de la variable. 
Elle peut etre suivie d'une liste d'iaitiales. Par exemple : 

DEFINT a,b,c 

.. .ou d'une fourchette d'irritiales : 

DEFINT a-z 
Mots cles associes : DEFREAL, DEFSTR 
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DEFREAL 

DEFREAL <liste de:<lettrcs concemees> 

DEFREAL x,a~f 

COMMANDE : D6finit le type dc variable par DEFaut, le type etant rid. Lorsqo'une variable 
uitervientsausidentificateurdetype(! %$), le type par deTautestautomatiquementmis em oeuvre. 
Le type de la variable sera determinee suivant la premiere lettre du nom de la variable. Elle peut 
fttre suivie d'une liste d'initiales : 

DEFREAL a,b,c 
. . .ou d'une fourchette d'initiales : 

DEFREAL a-z 
Mots c\6s associes : DEF1 NIT, DEFSTR 

DEFSTR 

DEFSTR <liste de:<lettres concemees> 

10 DEFSTR n 
20 nom~ n Amstrad" 
30 PRINT nom 
run 

Amstrad 

COMMANDE : Definit le type de variable par DEFaut le type 6tant une cbatoe. Lorsqu'uiie 
variable intervientsansideotificateur(l %$) le type par defaut est automatiqucmentmis en oeuvre. 
Le type de la variable est determinee selou la premiere lettre de son nom. La commande peut fttre 
juivie d'une liste d'initiales : 

DEFSTR a,b,c 

.. .ou d'une fourchette d'initiales : 

DEFSTR a-z 
Mots cl& associes : DEF1NT, DEFREAL 
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DEG 

DEG 

DEG 

COMMANDS : Etabttt le mode dc calcul en DEQres. Pardiraut, les fonction* SIN, COS, TAN 

et ATN considered que l'argument qui leur est transmis est exprime' en radians. La commande 

reste valable jusqu'a ce que Ton utilise les commandes RAD ou NEW, CLEAR, LOAD, RUN, 

etc 

Mots cles associ6s : ATN, COS, RAD, SIN, TAN 

DELETE 

DELETE <ensemble de lignes> 

DELETE 100-200 

COMMANDE : Efface une partie du programme d6fM dans r<ensemble de lignes>. H n'est pas 
nficessaire d'indiquer la ligne de depart ou la ligne d'arrivee pour effacer le programme <depuis 
le d6but> ou <jusqu'a la fin>. 

DELETE -200 

...ou: 

DELETE 50- 

. . . ou : 

DELETE 

... qui efface la totalite du programme. 

Mots ckSs associes : CHAIN MERGE, RENUM 

DERR 

DERR 

LOAD "xyz.abc" 

XYZ. ABC not found 
PRINT DERR 

146 
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FONCTION : Rapporte lc dernier code d'ERReur envoyfi par le systeme de gestion de la 
Disquette. La valeur de DERR peut servir a confirmer 1'erreur dftectee. Si voua voulez la liste 
des erreurs de la veille, ajoutez le parametre <HBER>. Consultez la liste des messages d'erreur du 
chapitre 'Pour information...". 

Mots cles associ£s : ERL, ERR, ERROR, ON ERROR GOTO, RESUME 

Dl 

Dl 

1 CIS : TAG: EVERY 1 GOSUB 90 

20 x1-RND*320:x2-RND*320 

30 y-200+RN O200:c$-CH R$(RNI>255) 

40 FOR x-320-xl TO 320*2 STEP 4 

50 Dl 

60 MOVE 320,0,1 ;MOVE x-2,y:MOVE x,y 

70 PRINT " ";c$;:FRAME 

80 EI:NEXT:GOTO 20 

90 MOVE 320,0:DRAM x+6,y-1 6,1: RETURN 

COMMANDE : Desactive une Interruption (autre que [ESC]) jusqu'a ce qu'elle soil reactivee 
dnectement par uoe commande El ou uxlirectement par un [RETURN] a la fin d'un sous-pro- 
gramme d'intemiption GOSUB. 

L'entree dans un sous-programme desactive automatiquement les interruptions de priorite" egale 
ou inferieure. 

On 1' utilise quand le programme doit s'executer sans interruption, par exemple quand deux 
lous-programmes sont en competition pour utiliser les ressources de rordinateur (les ressources 
grapbiques dans le programme ci-dessus, par exemple). 

Poor de plus amples informations sur les intenuptions consultez la partie 2 du chapitre "A vos 
fceuresdeloisir...". 

Mots cles associes : AFTER, El, EVERY, REMAIN 
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DIM 

DIM <liste de:<variable indicee> 

10CLS 

20 DIM ami$(5), tel $(5) 

30 FOR n-1 TO 5 

40 PRINT "telephone No";n 

50 INPUT "entrez le nom" ; ami$(n) 

60 INPUT "entrez le numero detel.";tel${n) 

70 PRINT 

80 NEXT 

90 FOR n-1 TO 5 

100 PRINT n;ami$(n) ,tel$(n) 

110NEXT 

run 
mMMANnF . DIMenriomie on tableau. Cette commande alloue respace requis aux tableaux 
%S^££tt^£^ U BASIC doit coonai^e I'espace reserve pour un 
tableau, eo l'absence de specification il prend 10 comme valeur par defaut 
Un tableau est identifie par une variable indic6e>, a savoir un Qom de variable accor^agoe d'un 
ensemble d'indices afin que chaque "element" du tableau ait sa propre valeur d rndice. 
Une boucle FOR NEXT pent servir a contrtler le tableau en infant chaque element du tableau 
a tour de role. 

La valeur mimmate d'un indice est zero (Cert le premier element d'un tableau). 
Les tableaux peuvent fetre rmlu^limensionnels et chaque element est reference par sa position. 
Par exemple, dans un tableau dimensionne par : 

DIM positions (20, 20, 20) 
. . .un element du tableau sera reference de la facon suivante : 

positions (4,5,6) 
Mots cles associes : ERASE 

DRAW 

DRAW <coordonnee x>, <coordonnee y> [,[<encre][,<mode d'encrO]] 

10 MODE OtBORDER 0:PAPER 0:INK 0,0 

20 x-RND*640:y«RND*400:z-RND*15 

30DRAWx,y,z 

40 GOTO 20 

run 
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COMMANDE: Trace une ligne sur recranentre la position ducarsetffgrapMqoeetuoepositioo 
tbsolue sp&iflee par les coordonnees x et y. L'<eocie> de tta^age pcut fttre specified (entre et 
15). 

le <mode d'encre> facultatif determine F interaction de 1'encre sur l'afficnage present a f ecran. 
Les (pia&e <modes d'eocro soot ks mivants : 



Normal 

XOR(OUexcIusif) 
AND(ET) 
OR(OU) 



Mots cl£s associes : DRAWR, GRAPHICS PEN, MASK 

DRAWR 

DRAWR <decalage x>, <decalage y> [,[<encre>][,<mode d 'encrO}] 

CLS : PRINT "tu morrtes au premier I?" 
20 MOVE 0,350:FOR n-1 TO 8 
30 DRAWR 50,0 
40 DRAWR 0,-50 
50 NEXT:MOVE 348,0 FILL 3 
60 GOTO 60 
run 

COMMANDE : Trace une ligne sur Pecran graphique a partir du cursenr graphique jusqu'a la 
position specifiee par les <deealages x et y>. L'<encre> du trace" peut etre specifiee (entie et 
15). 

Le <mode d'encio facultatif determine rinteraction de l'encre sur 1'afBchage present a l'ecran. 
Les 4 <modes d'eocro sont les suivants : 



Normal 

XOR (On exclusif) 

AND(ET) 

OR(OU) 



Mots ckSs associes : DRAW, GRAPHICS PEN, MASK 

EDIT 

EDIT <numero de ligne> 

EDIT 20 

COMMANDE : Afficbe la ligne du programme ainsi que le cursenr, pr6t a reditioa 
Mots cies associes : AUTO, LIST 
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El 

El 
El 

COMMANDE : Active uoe mteroplion detactivee par Dl. 

Dcs imenuptions desaciivees par un sous-programme d'intemiption sont automatiqocmeiit reta- 

blies par la commande RETURN, en fin de sous-programme. 

Pour de plus amples informations, consnltez la partie 2 du chapitre "A vos heures de loisir..." 

Mots ck*s associes : AFTER, Dl, EVERY, REMAIN 

ELSE 

(Voir IF) 

END 

END 

END 

COMMANDE : Met fin a rexecntion d'un programme et rftablit le mode direct Un programme 
peut contenir un nombre quelconque de commandes END (elle est implicate a la fin de toot 
programme BASIC AMSTRAD). 
Mots cl€s associes : STOP 



ENT 

ENT <numero d'enveloppO [,<section d'enveloppO] [,<section d'enveloppO] 
[,<section d'enveloppO] [,<section d'enveloppO] [,<section d'enveloppO] 

10 ENT 1, 1O.-50, 10, 10, 50, 10 
20 SOUND 1,500, 200,10,1 
run 

COMMANDE : Defimt l'ENveloppe de Tonalite specifiee par le <iiumero d'enveloppO (enlre 
1 et 1 5) utilisee avec la commande SOUND. Si le <numero d'enveloppO est negatif (entre -1 et 
-15) l'eoveloppe se repete jusqu'a la fin de la duree du son fix* par la commande SOUND. 

Cbaque <section d'enveloppO peut contenir 2 ou 3 parametres : 

Dans le cas de trois parametres, ceux-ci sont : 

<nombre de pas> , <amplitude du pas> , <duree du pat>. 
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parametre 1 : <nombre de pas> 

Specific le <nombre de paa> de variation de tanalrtf a rintfrieur de la section d'envdoppe. Par 
exemple, dans une section de note durant 10 secondes, vous pouvez fixer 10 pas de 1 seconde 
Chacon. Dans ce caa, le <nombre de pas> sera 10. Le <nombre de pas> peut varier de 04239. 

Parametre 2 : <amplitude du pas> 

Doit etre compris entre -128 et + 127. les pas nfgatifs augmeotent la hauteur de la note, les pas 
positifs I'abaissent La periode sooore minima le est de 0. Toutes les penodes sonores disponibles 
toot presentees au chapitre 'Pour information...". 

Parametre 3 : <duree du pas> 

Speafle la duree d'un pas, par unites de 0,01 seconde. Elle peut varier de 1 256 (0 a la vateur 
296), la duree maximale d'un pas est (tone de 2,66 secondes. Si vous n'utilisez que deux 
parametres, ce sont : <penode sonore>, <dur©edupas> 

Parametre 1 : <periode sonore> 

la nooveBc valeur de la periode. (Voir le parametre 2 de la commande SOUND). 

Parametre 2 :<duree du pas> 



i la duree unique en unites de 0,01 seconde. Pent varier entre et 256 (0 ayant la valeur 
96) sort 2,56 secondes. 

GENERALITES 

La dwee totale des pas ne doit pas depasser le parametre <dureO de la commande SOUND, car 
k son se famine alors avant d'avoir traverse' la totality des pas. (Le reste de renveloppede tonality 
m alors ignore*). De meme, si la <duree> de la commande SOUND depasse la duree totale des 
ps, le son sepoursuit apres avoir traverse' tous les pas etdemeure constant a la tonality finale. 

La commande ENT peut s'accompagner de 5 <sections d'enveloppo differentes (cbacune 
MMttofe des 2 ou 3 parametres ci-dessus). 

Le pearier pas d'une enveloppe de tonalitg s'execute immgdiatement 

."iaque fois qu'une nouvelle enveloppe est attribuee a un numero d'enveloppe d6terminee, la 
«fimtioo precedente est perdue. 

Ji <numero d'enveloppo sans <section d'enveloppo annule toutes les specifications pr6c6- 

tov de phis amples informations, consultez la partie 2 du chapitre "A vos heures de loisir...". 
tttcto associes : ENV, SOUND 
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ENV 

ENV <numero d'enveloppO [,<section d'enveloppO] [,<section d'enveloppO] 
[,<section d'enveloppO] [,<section d'enveloppO] [,<section d'enveloppO] 

10 ENV 1,15,-1, 10, 15, 1,10 
20 SOUND 1,200, 300, 15,1 
run 

COMMANDE : Definit l'ENVeloppe de Volume conespoodactau <numero d'enveloppO (eotre 
1 et 15, utilise avec la commande SOUND. 

Hie peut contenir 2 ou 3 parametres : 

Pour 3 parametres : 

<uombre de pas>, <amplitude du paa>, <duree du pas>. 

parametre 1 : <nombre de pas> 

Specifie le <nombre de paa> de volume qu'un son doit traverser dans la section d'enveloppe. Par 
exemple, dans une section de 10 secondes, vous pouvez fixer 10 pas de volume d'une seconde. 
Le parametre <nombre de pas> esttfgal a 10. 

Le narametre peut varter de a 127. 

Paramfetre 2 : <amplitude du pas> 

Peut faire varier le volume de a 1 5 par rapport au pas precedent Les 1 6 volumes diffcrents sont 
les memes que ceux de la commande SOUND. Le paramfetre <amplitudedupa8>peutcependant 
varier de -1 28 a + 1 27, le volume revenant a apres avoir atteint 15. 

Parametre 3 : <durfee du pas> 

specific la duree d'un pas en unites de 0,01 seconde. Peut varier de a 255 (0 a la valeur 256), 
soit 2,56 secondes. 

Pour 2 parametres : 

<enveloppe matenello, <periode de 1'enveloppO 

Parametre 1 :<enveloppe materiello 
opecifie la valeur a envoyer au registre d'enveloppe contenu dans le generateur sonore. 

parametre 2 :<penode de 1'enveloppO 

Specifie la valeur a envoyer aux registres de periode d'enveloppe contenues dans le gfenerateur 
sonore. 

L'utilisatioQ d'enveloppes materielles suppose la connaissance du materiel. Si vous ne Pavez pas, 
il vaut raieux utiliser une enveloppe logicielle integrant un paramfetre <duree du pas> adequat 
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GENERALITES 

La duiee des pas oe doit pas depasser le p a rametre de <durfe> de la commande SOUND, le soo 
se termine alors avant d'avoir traverse tons les pas de volume (le teste de l'enveloppe est ignort) . 

De meme, si le parametre de <duree> de la commande SOUND depasse la duiee totale des pas, 
le son se poursuit apres avoir traverse tous les pas de volume et demeure constant au volume final 

La commande ENV peut contenir 5 sections d'enveloppes difKrentes (constitnees des 2 ou 3 
parsmetres ci-dessus). 

le premier pas d'une enveloppe de volume s'execute imme<liatemenL 

Cheque fois qu'une nouvelle enveloppe est attribuee a un numero d'enveloppe de*termuj6, la 
definition pn5c6dente est perdue. 

La specification d'un <num6ro d'enveloppo sans <section d'enveloppo amrale toutes les 
valeurs prtctfdentes. 

Pour de plus amples infonnations, consultez la partie 2 du chapitie "A vos heures de loisir...". 
Mots cles associes : ENT, SOUND 

EOF 

EOF 

10OPEN1N"exl.bas M 

20 WHILE NOT EOF 

30 LINE INPUT #9,a$ 

40 PRINT a$ 

50 WEND 

60 CLOSEIN 

run 

PONCnON : Pour tester l'etat d'un fichier ouvert Donne -1 (vrai) si Ton est en fin de fichier 
(End Of File) ou si aucun fichier n'est ouvert, sinon donne (feux). 

Mots cles associes : OPENIN, CLOSEIN 

ERASE 

ERASE <liste de:<nom de variable> 

DIMa(100),b$(100) 
ERASE a,b$ 

OOMMANDE : Quand un tableau n'est plus oecessafae, il peut etre efface (ERASE) afin de 
^berer la metnoiie pour d'autres utilisations. 

Mots cles associes : DIM 
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ERL 
ERL 



10 ON ERROR GOTO 30 

20 GOTO 1000 

30 PRINT T'erreur est en Bgne" ;ERL 

40 END 

run 



FONCTION: I^»Delenuin6ro<teHgnedela(teniitoerreurrencontrte. Dansrexanpteci-des3us 
TERrcur de la Ugne 20 est indiqu6e par la fonction ERL. 

Mots cles associes : DERR, ERR, ERROR, ON ERROR GOTO, RESUME 



ERR 
ERR 

GOTO 500 

Line does not exist 

Ready 

PRINT ERR 

8 

FONCTION: Donne le numerodeladeraiere ERReurdetectee. Voirlalistedesmessagesd'erreur 
au chapitre "Pour information.,.". Dans Texemple ci-dessus, le numero d'erreur 8 correspond a 
"line does not exist" (Ligne non existante). 

Mots cles associes : DERR, ERL, ERROR, ON ERROR GOTO, RESUME 



ERROR 

ERROR <nombrc entiet> 

10 IF INKEY$-" H THEN 10 ELSE ERROR 17 run 

COMMANDE : Decide une action consecutive a une eneur numerotee. Voir la listedes messages 
d'erreur 1 a 32 au chapitre "Pour information...". L'action est la meme que celle prevue par le 
BASIC en cas d'erreur reelle, faisant appel a un sous-programme de traitement d'erreur, le cas 
echeant, et rapportant les valeurs appropriees d'ERR et ERL. 
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ERROR accompagne' d'uo <nombre entier> compris entre 33 et 259 pent servir a creer des 
messages d'enenr peraonnalises tels que : 

10 ON ERROR GOTO 100 

20 INPUT "entrez un caractere'* ; a$ 

30 IF LEN (a$) <>1 THEN ERROR 100 

40 GOTO 20 

100 IF ERR-1 00 THEN 110 ELSE 130 

110 PRINT CHR$(7) 

1 20 P Rl NT "f al <ft UN caract6re I" 

130 RESUME 20 

run 

Mots cKa associes : ERL, ERR, ON ERROR GOTO, RESUME 



EVERY 

EVERY <periode du chroiKxnetre>[,<humero du chronometre>3 
GOSUB<mimen> de ligno 

10 EVERY 50, 1 GOSUB 30 

20 GOTO 20 

30 SOUND 1,20 

40 RETURN 

run 

COMMANDE : Appelleun sous-programme do BASIC a intemlles reguliers. La <pe*iode du 
dironomfetre> specifie rintervalle par unites de 0,02 seconde. Le <numero de cbronometro 
(compris entre et 3) specifie lequel des quatre chrooometres utiliser. Le cnronometre 3 
correspond a la priorite superieure et le a la priori^ inferieure. Cnaque chronometre peut fetre 
is*oci6 a un sous programme. 

Pour de plus amples informations sur les interruptions, consultez la partie 2 du chapitre "A vos 
hemes de loisir..." 

Mots cl6s associes : AFTER, REMAIN 

EXP 

EXP (Expression numeriquO 

PRINT EXP (0.876) 
068.743625 

PONCTION : Calcule "E" a la puissance donnee par r<mpmmim r wrntfriq uo ou "E" est egal 
1 2,7182818 environ, le nombre dont le logaritnme naturel est 1 . 

vtots cles associes : LOG 
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FILL 

FILL <cncre> 

10 MODE •■ ■ 

20 FOR n-1 TO 500 

30 PR INT "0": 

40 NEXT 

50coulstylo-2+RNCM3 

eOFILLcoulstylo 

70 GOTO 50 

run 

COMMANDS : Remplhunc««c**«nrfre de VtauL Lea bortt de la wme tool dflimttfe par 
ks \ipxs desainecs avec Pecrao du stylo en cours ou avcc l'encre du food (comprise cntre et 
15). Le rempKssage part de la position du curseur graphique. Si celui-ci se trouve sur on bad, 
rienn'estrcmpli. 

Mots ctes assocta : GRAPHICS PEN 



FIX 

FIX (Expression numenque>) 

PRINT FIX (9.99999) 
9 

FONCnON : Enleve la partie decimate d'une <exprcssion immertqoo en ammdissant toujours 
parde&ut 

Mots ctes associds : CINT, INT, ROUND 

FN 

(VolrDEFFN) 

FOR 

FOR <variable simple> - <dftrot> TO <fin> [STEP <incrfmeot>] 

10FORn-2TO8STEP2 
20 PRINT n; 
30 NEXT n 
:>■■■■ 40 PRINT", qui vaaugnwmrf ■-■.->.*•■■,«»■= 
run 
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COMMANDE : Execute la partie du programme se trouvant entre les mots cles FOR et NEXT, 
wtant de fois que Ton peut ajouter r<increment> a la <variable simplo et partant du <d£but> 
josqu'a la <fin>. Si P<increment> est omis, il prend implicitement la valeur 1. 

La valeur de r<increment> peut fetre negative. Dans ce cas la valeur du parametre <d6but> doit 
etre supeneure a celle du parametre <fin>, faute de quoi la variable ne peut fttre incrementee. 

Les boucles FOR NEXT peuveut £tre imbriquees. 

L'affectation du nom de variable a la commande NEXT est facultative car le BASIC determine 
automatiquement la commande NEXT a laquelle est associee uue c ommand e FOR. 

Mots cles associe&s : NEXT, STEP, TO 

FRAME 

FRAME 

10 MODE 

20 PRINT "sans FRAME" 

30 TAG ' 

40 MOVE 0,200 

50 FOR x-0 TO 500 STEP 4 

60 IF f-1 THEN FRAME 

70 MOVE x,200 

80PRINT M,, ;CHR$(143); 

90 NEXT 

100 IF f-1 THEN RUN 

110 CLS 

120TAGOFF 

130 PRINT "avec FRAME" 

1401-1 

150 GOTO 30 

run 

COMMANDE : Synchronise recriture des graphiques avec les trames video. D en resulte un 
■pgvement plus harmoraeux des caracteres ou des graphiques a l'ecran sans distorsion et sans 
■antfltemenL 

Uots cies associes : TAG, TAQOFF 
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FRE 

FRE (Expression numenque>) 
FRE (<cha3ne aiphanum^riquO) 

PRINT FRE (0) 
PRINT FRE ("") 

PONCnON : Indique Tespace dispooible en mtooire. la forme FRE ("") force l'ordinateur a 

mettre de l'ordre avant de donner la valeur de 1'espace disponible. 

REMARQUE : Le BASIC n'exploite que les 64 premiers Ko de la memoire. 

Mots cl£s associ6s : HIMEM, MEMORY _ 



GOSUB 

GOSUB <num6ro de ligne> 
GOSUB 210 

COMMANDE : Appelle un sous-programme BASIC en se brancbant sur la ligne indiquee. La fin 
du sous-programme est marquee par la commande RETU RN renvoyant le programme a 1'instmc- 
tion suivant la commande GOSUB. 
Mots cl6$ associ£s : RETURN 

GOTO 

GOTO <num6ro de lignO 

GOTO 90 
COMMANDE : se branche sur le numero de ligne indique". 
Mots cl6s associ£s : Aucun 

GRAPHICS PAPER 

GRAPHICS PAPER <encre> 

10 MODE 

20 MASK 15 

30 GRAPHICS PAPER 3 

40 DRAW 840,0 

run 
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COMMANDB : Determine l'<encre> du fond graphique. Lors du tracage de lignes le fond n'est 
pas visible. Dans l'exemple ci-dessus, la commands MASK permet le tracage d'une ligne en tirets 
et la visualisatioo du fond grapbique. 

L'encre du fond (0 et 15) sen a la zone "paper 4 ' sur laquelle s'affichent les' caracteres, lorsque 
TAG fonctionne, et fait office de valeur par def aut lors de 1'effacement des fenetres graphiques a 
l'aide de CLQ. 

Mots cles associes : CLG, GRAPHICS PEN, INK, MASK, TAG, TAGOFF 

GRAPHICS PEN 

GRAPHICS PEN [<encre>][,<mode du fond>] 

10 MODE 

20 GRAPHICS PEN 15 

30 MOVE 200,0 

40 DRAW 200, 400 

50 MOVE 839,0 

60 FILL 15 

run 

COMMANDB : Fixe l'<encre> (entre et 15) pour le dessin des lignes et le positionnement des 
points. Le <mode du fond> peut egalement etre fix6 : 

: Fond opaque 

1 : Fond transparent 

0^e fond transparent a une influence sur le fond graphique des caracteres ecrits avec TAG et les 
spaces en lignes pointillees). 

Vous pouvez omettre l'un des parametres mais pas les deux. Si Fun des parametres est omis, la 
«akur specifiee reste inchangee. 

i ckis associes : GRAPHICS PAPER, INK, MASK, TAG, TAGOFF 



HEX$ 

HEX$ (<nombre entier sans signe>[,<largeur de zone>] 

PRINT HEX$ (255,4) 
OOFF 

IWCTION : Charge un nombre entier en un nombre HEXadecimale equivalent en accord avec 
t moatxt de chiffres hexadecimaux indique* par la <largeur de zone> (entre et 1 6). SI ce nombre 
oi trop grand, 1 'expression finale est compldtee par des zeros a gaucbe du nombre. S*il est trop 
fgH, eBe ne sera PAS tronqueemais le nombre de chiffres produit sera egal au nombre requis. 
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Le <uombre entier sans signe> a convertir sous fonne nexadecimale so* produire une valeur 

comprise entre -32768 et 65535. 

Mots elds associds : BIN$, DEC$, STR$, UNT 

HIMEM 

HIMEM 

PRINT HIMEM 
42619 

FONCTION : Donne l'adresse de l'octet le plus haut dans la MEMoire utilisfe par le BASIC 

(modifiable par la commande MEMORY). 

REMARQUE : le BASIC n'exploite que les 64 premiers Ko de la memoire. 

Mots c!6s associ6s : FRE, MEMORY, SYMBOL, SYMBOL AFTER 



IF 

IF expression logique> THEN <option>[ELSE <option>] 

10 MODE 1 

20x-CINT(RND*100) 

30 PRINT "devinez un chlffre (0 a 1 00)" 

40 INPUT n ... -,-:■ 

50 IF not THEN PRINT n; H esttrop petit..." 

60 IF n>x THEN PRINT n;"est trop grand..." 

70 IF n-x THEN 80 ELSE c-c+1 :GOTO 40 

80 PRINT "Bien vu! ";: 

90 PRINT" Trouve en" ;c+1; "fois !" 

run 

COMMANDE : Determine si l'<expression logique> est vraie pour executer, le cas > fcMant, la 

premiere <option>. Si V <expression logiquo est fausse, r<option> placee apres ELSE s execute. 

En absence de deuxieme <option>, le BASIC passe a la ligne suivante. 

Les commandes IF THEN peuvent etre imbriquees mais se terminent a la fin de la ligne. On ne 

peut done PAS avoir de declarations independantes de IF THEN sur la meme hgoe. lorsque le 

resultat de l'<expression logiquo necessite un saut de ligne. la commande peut, par exemple, se 

formuler: 
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...ou 



...on 



IFa-1 THEN 100 



IF a-1 GOTO 100 



IFa-1 THEN GOTO 100 
Mots ctes assoctts : ELSE, GOTO, THEN 6 

INK 

INK <encre>, < coutein>[,< couleui>] 

10 MODE 1 .PAPER OPEN 1 

20 FOR p-0 TO 1 

30 FOR i-0 TO 26 

40INKp,i ■■■*. 

50 LOCATE 16,12 : PRINT M lNK H ;p; ",";1 

60FORt-1 TO400:NEXTtj,p ,.'*^ 

70INK0,1:INK1,24:CLS 

run 

COMMANDS : Affecte la ou les couleurs a unc encre donnee. Le parametre <encre> foumit la 
-tference de l'encre (par un entier compris entre et 15) a l'intention des commandes PEN ou 
PAPER correspondantes. Le premier parametre <numero de couleur> (entier) donne une valeur 
jc couleur comprise entxe et 26. Si le second parametre de couleur facultatif est specific, l'encre 
line d'une couleur a l'autre selon une vitesse dCfinie par la commande SPEED INK. 

cles associes : GRAPHICS PAPER, GRAPHICS PEN, PAPER, PEN, SPEED INK 



WKEY 

INKEY (<nombre entier>) 

10 IF INKEY (55) <>32 THEN 10 

20 PRINT "Vous venez d'appuyer sur [SHIFT] et V" 

30 CLEAR INPUT 

run 

fONCnON : Interroge le clavier pour indiquer les touches pressees. Le clavier est analyse* tons 
mdmfuMtttnzs de seconde. Cette fonction sert ade"tecter la position haute ou basse d'une touche 
m Section de la valeur -1 (independante de l'Ctat des touches [SHIFT] et [CONTROL]). 
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Dans I'exemple ci-dessus, le systeme ddtecte rartionnement simultane de [SHIFT] et V (numero 
detouche55) avantd'arreterle programme. Les oum6ros detouche sontdonnds danslediagramme 
sitae en haul a droite du boMer de l'ordinateur (voir egatement le chapitie "Pour information... . 

[SHIFT] et [CONTROL] sont identifies par les valeurs suivantes : 



Valeur 


[SHIFT] 


[CONTROL] 


touche specifies 


-1 


INDIFFERENT 


INDIFFERENT 


RELEVEE 





RELEVEE 


RELEVEE 


ENFONCEE 


32 


ENFONCBE 


RELEVEB 


ENFONCEE 


128 


RELEVEB 


ENFONCEE 


ENFONCEE 


160 


ENFONCEE 


ENFONCEE 


ENFONCEE 



it 



Mots cles associes : CLEAR INPUT, INKEY$, JOY 

INKEYS 

INKEYl ^r 

10CLS 

20 PRINT "chofsissez OUI ou NON (O/N)" 

30a$-INKEY$ ikdRA. 

40 IF a$- H " THEN 30 

50 IF a$-"o" OR a$-"0" THEN 80 

80 IF a$-"n" OR a$- H N" THEN 90 

70 GOTO 30 

80 PRINT "Vous avez choisl OUI" : END ■„, .,.-. , 

00 PRINT "Vous avez choisi NON" 
run 

FONCnON: Interroge le clavier pour mtroduire dans le programme toute chatne de caracteres 
entrte. Si aucune touche de clavier n'est actionnee, INKEY$ rcnvoie une chatoe vide. Dans 
Pexemple ci-dessus les lignes 40 et 70 commandent au programme de revenir a la ligne 30 apres 
interrogation du clavier par la fonction INKEY$. 
Mots cles associes : CLEAR INPUT, INKEY 
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INP 

1NP (<numero du port>) M 

PRINT INP (&FF77) 
255 

FONCTION : lit la valeur contenue dans un port d'entrees-sorties dont Tadresse est transmise 
par rargument de cette fonction. 

Mots cles associes : OUT, WAIT 

INPUT 

INPUT [#<num£ro de G*nal>,]C][<cha*me> <s6parateur>) <liste de:<variable> '■ 

10 MODE 1 

20 INPUT "donnez-moi deux nombres a multiplier (separes par une virgule)" ;a,b 

30 PRINT a,-"fois";b; K forrt";a-b 

40 GOTO 20 

run 

CDMMANDE : Retort tes donnees en provenance du canal precise* (canal #0 en l'absence de 
•pacification). 

Js point-virgnle INPUT supprime le passage a la ligne apres execution de la commande. 

_* <separateur> peut fttre un point-virgule ou une virgule. Un point-virgule place" apres la cbatne 
M a ppar al tre un point d'interrogation ; une virgule le supprime. 

9 Me entree est effectuee, un O pour un par exempk, BASIC repond : 
?Redo from start 

ao tout autre message d'eneur programme* par vos soins. 
~*m* reponse ao clavier doit se terminer par [RETURN]. 
mm des associes : LINE INPUT, OPENIN 
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INSTR 

INSTR ([<start position>,]<searched string>,<searched for string>) 

10CLS 

20 alphabet$-alphabet$+CHR$(n+64) 
30 INPUT "Errtrez une lettre" ;a$ 
*••• 40 b$-UPPER$(a$) 

50 PRINT b$;" est en position"; 

80 PRINT INSTR (a)phabet$,b$); 

70 PRINT "dans l'alphabet.":PRINT 

80 GOTO 40 

run vi m-y 

FONCTION : Cherche dans la <ehaine contenanto l'occurrence de la <cha!ne contenue> et 
indique la position de la premiere occurrence de la chatne rechercbee. En son absence, la fooction 
indique la valeur 0. 

La position du debut de la recherche est facultative, elle est specifiee par le paramfetre <position 
de deparo sous la forme d'un entier compris entre 1 et 255. 

Mots cles associes : Aucun 

INT 

INT ^expression nume'riquO) 

PRINT INT (-1.995) 

-2 

FONCTION : Arrondit an premier entier inferieur, enlevant la parte fractionnaiie. Identique a 
FIX pour les nombres positif s, il donne 1 de moins que FIX pour les nombres negatifs qui ne sont 
pas des entiers. 

Mots cl6s associes : CINT, FIX, ROUND , 

JOY 

JOY (<iiombre entier>) 

10 PRINT "Pour arreter le programme -"; 
20 PRINT "actionnez la manette de jeu" 
30 IF JOY (0) o THEN END 
40 GOTO 10 
run 
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FONCTION : La fonctioo JOY lit l'ftat de la manette de jeu specifiee par le <nombre entier> (0 
ou 1 ). Lc resultat n'a de signification qu'en binaire. 



Bit 


Decimal 


fr.Haut 


1 


l:Bas 


2 


2: Gauche 


4 


3:Droite 


8 


4:Tir2 


16 


5:Tirl 


32 



Ainsi lorsque vous appuyez sur le bouton de "tir" (Tir 2) de la premiere manette en deplacant 
celle-ci vers la gauche, la fonction JOY (0) envoie une valeur decimale egale a 20, soit 16 (Tir 
2) + 4 (Gauche). 

Pour de plus amples informations, consultez le chapitre "Pom information..." 

MotscKs associ6s : CLEAR INPUT, INKEY 

KEY 

KEY <numero logique de touche>,<chalne alphanumenque> 

KEY 11 "border 13:paper 0:pen 1:ink 0,13:ink l,0:mode 2:list n +CHR$(13) 

- jppoyez sur la touche [ENTER] 

rOMMANDE : Associe une chalne a la tonche (KEY) correspondant au <numero logique de 
vmdx > specifiee. n existe 32 numeros logiques de touche (de a 31 X occupant le? touches 1 28 
i 4 59 Les touches 1 28 (0 sur le clavier numenque) a 1 40 ([CONTROL] [ENTER] sur le clavier 
t... que)sontassccieesr^de'fautauxchu^s0a9 f aupomtdeamaLa [RETURN] eta RUN" 
~ E " J RN] - (pour la cassette), mais peuvent etre associes a d'autres chalnes si necessaire. Les 
«e*to$ logiques de touche 13 a 31 (touches 141 a 159) sont affectes a des chalnes vides par 
*£jot mais peuvent 6tre etendus et associfis a des touches, a Paide de la commande KEY DEF. 

u <wmatxo logique de touche> fourni dans la commande KEY doit fctre compris entre et 31 
m^am 1 28 et 1 59 pour correspondre aux numeros physiques des touches du clavier nunriaque. 
« h representation des touches au chapitre 'Pour information..."). 

* ^me specifiee ne doit pas depasser 1 20 caracteres au total. Le depassement de cette limite 
i erreur (5) 'Improper argument" (argument incorrect). 

i anodes: KEY DEF 
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KEY DEF <numero de touched <r^tition>,[ > <nornial>[,<avec shffi> [,<avcc 
control>]]] 

KEY 1 59, Vest la touche TAB" 
KEY DEF 68,1,150 

Appuyez sur la touche [TAB] 

COMMANDE : D«init la vateur logique d'une touche (KEY) DEFinie par son niveau physique, 

compris entre et 79 (voir 1'illustratlon des oumeros de touche en haut a droite de l'oidinateur 

ou au chapitre "Pour information...")- Les parametres <normal>, <avec sbift> et <avec control> 

doivent conteoir les valeurs a envoyer lorsque la touche est enfoncee, seule avec [SHIFT] ou avec 

[CONTROL]. Ces parametres sont facultatifs. 

Le parametre <reperMon> pennet d'activer et de deaactiver la fonction d'auto- repetition (1 ou 

0). La Vitesse de celle-ci est reglable par la commande SPEED KEY. 

Dans l'exemple ci-dessus, la touche 1 59 (correspondant au numero logique 3 1) estd'abord assocfe 

a une chalne. La commande KEY DEF definit ensuite la touche 68 (touche [TAB]) pour activer 

l'auto-rep6tition (1 ) et envoyer la valeur <nonnal> 1 59 lorsque la touche est enfoncee. 

Pour revenir au mode normal : 

KEY DEF 68,0,9 

. . .9 etent la valeur ASCII normale de [TAB]. 
Mots cl6s associes : KEY, SPEED KEY ^ 

LEFT$ 

LEFT$ (<chame alphanum6rique>,<longueur requise>) 

10CLS 

20 a$-"AMSTRAD" 

30 FOR n-1 TO 7 

40 PRINT LEFTS (a$,n) 

50 NEXT 

run 

PONCTION : Extratt un certain nombre de caracteres (entre et 255) a gauche d'une <chatne 
alphanumerique>. Sfh* chalne est plus courte que la longueur requise, eUe est utilisee entierement 

Mots cles associes : MID$, RIGHTS 
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LEN 

LEN (<cha3ne alphanum6riquc>) 

1 UNE INPUT "entrez une pnrase";a$ 
20 PRINT "la phrase est longue de"; 
30 PRINT LEN (a$),* H caracteres , \ 
run 

F0NCnON:Doonelenonibredecaracttestela<ch^ 
Mots cles associes : Aucun 

LET 

LET <variable>-<expression> 

LETx-100 

COMMANDE : Assigne une valeur a une variable. Un reste des BASIC historiques, pour lesquels 
m devait annoncer ses variables. Seulement utile pour la compatibility avec des p ro gr ammes 
wtfrieurs. En AMSTRAD BASIC, il sufflt d'ecrire : 

x-100 



i cles associes : Aucun 

UNE INPUT ^ 

UNE INPUT #[<num6ro de canal>J[;][<chalne> <separateur>] <variable en 
cfaa&iO 

10 LINE INPUT H tapez une llgne de texte ponctuee.";a$ 20 CLS 
30 PRINT "la variable a$ est bien egate & :-" 
40 PRINT a$ 
run 

naMMANDE : Recoil une ligne eatieie en provenance da canal indique^ (#0 en 1* absence de 
rlcation). Le premier [j] point- virgule facultatif supprime le retour chariot/saut de ligne qui 
:eot nonnalement apres execution de la commande. 

-x <jeparateur > petit fttre un point-virgule ou une virgule. Le point-virgule entrame 1'afficbage 
r m point d'interrogation ; la virgule le supprime. 



de LINE INPUT au clavier se tennine par l'activatiou de la touche [RETURN]. 

? tNPUT en provenance du canal #9 de la disquette (ou de la cassette) se termine par un retour 
ou par raffectation de plus de 255 caracteres a la < variable en chalno. 

tctft associes : INPUT, OPENIN 
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LIST H3J 

LIST [<ensemble de ligncs>] [,#<numero de canal>] 
LIST 1 00-1 000,#1 

COMMANDS :Uatele programme 

LIStage peut etre provisoirement iuterrompu si vous appuyez une fois sur la touche JESC], pour 
etre ensuite repris a l*aide de la barre d'espacement Si vous appuyez deux fois sur [ESC], vous 
arretez le listage et revenez au mode direct 

Vous pouvez omettre le premier ou le dernier numero de ligne du parainetrc<eii8embtefeligiies> 
pour lister le programme depuis le deTnit, ou jusqu'a la fin. 

Exemples: 

LIST -200 

...ou: 

LIST 50- 

...ou: 

UST 

. . .Hste la totalite du programme. „ v > , !0 M 

Mots ctes associes : O PENOUT 



LOAD 

LOAD <nomfich>[,<adresse>] 

LOAD M fichdisc.xyz",&2AF8 r 

COMMANDE : Charge en memoire un programme BASIC se trouvant sur disquette, en ecrasant 
tout programme en place. Avec l'option de l'adresse, charge un fichier binaire a l'adresse indiquee 
au lieu de l'adresse a laquelle il se trouvait au moment de la sauvegarde. 
Un programme protegd ne peut PAS etre charge par la commande LOAD car il eat alors 
irrmiediatement efface de la memoire. Dans ce cas, utilisez RUN ou CHAIN. 
464: n n'est pas necessaire de specifier de nom si vous voulez que le premier richer de 

la cassette soit charged On vous demandera de : 

Press PLAY then any key 

. . . apres quoi vous devez appuyer sur la touche PLAY du lecteur de cassette, puis itn : une des 
touches de I'ordinateur. La cassette commencera a tourner et rordinateur chargera le fichier a 
«ecuter. y^ _. . . ^,.,. 
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L'ecran afficbera te message sirivant : 
LoacSng FILENAME block 1 

. . .et ce autant de fois qu'il y a de blocs dans un fichier jusqu'a ce que le fichier soft charge. 

Si le premier caractere du fichier est ! , alors le message ci-dessus sera sera supprime et on ne vous 
demanderapas de "Press Any Key" pour charger le fichier. (Vous devez vous assurer que latouche 
PLAY du lecteur est enfoncee). Si votre programme utilise le signe ! egalement necessatre pour 
exploiter la disquette, le signe ! sera ignore pendant le traitement de la disquetie (lors de la lecture 
do nom de fichier du (tisque). Notez que le signe ! ne peut PAS remplacer un caractere dans le 
nom du fichier d'une cassette ou d'un disque. 

Le rait d'appuyer sur la touche [ESC] produit un message d'eneur a Tecrao : 

Broken in 
Mots cles associes : CHAIN, CHAIN MERGE, MERGE, RUN, SAVE 

LOCATE immaa9 um mt 00 i „..,, ^ ( %**nw- ...^ »»»*>:■■■' ■ kh. 



LOCATE[#mimero de canal>,]<coordorm«e x>,<coordorm6e y> 



!,*:■ 



10 MODE 1 

20FORn-1 TO 20 

30 LOCATE n,n ># -** a %a 

40 PRINT CHR$(143);"posrtion"; 

50 PRINT n;", M ;n ....... a* 

80 NEXT 
run 

COMMANDE : De*place le curseur de texte vers une nouvelle position relative au coin supeneur 
s de la fenetre (WINDOW) JO represente le canal par defaut 



Mots cles associes : WINDOW 

LOG 

LOG (<expression nurnerique>) 

PRINT LOG (9999) 
9.21024037 

UNCTION : Calcule LOGarithme naturel d'une expression numerique (sup6rieure a 0). 
**$ cles associes : EXP, LOG 10 
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LOG 10 (Expression num6rique>) 

PRINT LOG10 (0999) sh *^ ? * m ****' 

3.99995657 sIK 

FONCTION : Calcule le LOGarithme a base 1 de r<expression num£rkjoe> (superieure a rfro) 
Mots cles associes : EXP, LOG 

LOWERS i*i 

LOWERS (<chame alphanum6rique>) ** f wand 

10 a$-"REGARDE2 COMMENT LES L£TTT«S90WTtJH«*3EES^w rtfcaoM 

20 PRINT LOWERS (a$+"EN TYPE MINUSCULE") 

run 

FONCTION : Change toutes \m majuscules (Tune chatne alprianumerique en minuscules. Utile 
qnand on attend des repooses composees d'un melange de majuscules et de minuscules. 

Mots cl6s associfc : UPPERS 

'0£f ■ 

MASK ^ .;vo^:r 

MASK [<nombre entier>] [,<trace* du premier point>] 

10 MODE 0:INK 5,21 :INK 8,18 

20 MOVE -1 00-RND, 400-RND . ,. t . - t iymi 

30 WHILE XPOS<840 ..%^'- '■!-■■ 

40FORX-1TO8 

50MASK2t(8-x) 

60 DRAWR 32,0^,1 :MOVER -32,0 

70 NEXT 

80 MOVER 34,0 

90 WEND:GOTO 20 

run 

COMMANDS : DefiMt lemodele a utiliserpour le trace des hgnes. La valeur bmaire da <nombre 
entkr> comprise entre et 255 active (1) ou desactive (0) les bits dans chaque groupe adjacent 
de 8 pixels. 

Le parametre <trac6 du premier point> determine si le premier point de la ligne doit fttre trace" (1) 
ou(0). 
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Voospoovezomettre 1'un da panmetresmsis pas let deax. Si vous en omdtezun.sa specification 
demeure inchangee. 

Mots cles assodes : DRAW, DRAWR, GRAPHICS PAPER, GRAPHICS PEN 



MAX 

MAX(<listedc:<expres8ionnum6riquO) ^ ,- 

10n-66 

20 PRINT MAX (1 ,n,3,6,4,3) 

run 

66 

FONCnON : Donne la valeur la plus grande (M AXimale) de la Iiste. 

Mots cl& associfc : MIN " : . i " i 

MEMORY HAOJ 30B3MHIAHO *» 

MEMORY <adres8e> 
MEMORY &20AA 

COMMANDE : D6finit la quantite de memoire BASIC dispooible en fixant l'adresse de l'octet 

le plus e"lev6. 

Mots cles associes : FRE, HIMEM, SYMBOL, SYMBOL AFTER 

MERGE 

MERGE <nomfich> 

MERGE "nouversi.ba8" 

COMMANDE : Charge un programme a partir de la diaquette et 1'ajoute au programme deja en 
memoire. 

Les numeros de ligne du.programme en place se retrouvant dans le nouveau programme sont 
automatiquemeot ecrasfis. 

Les fichiers protegfc (SAuVEgardes par SAVE, p) ne peuvent PAS etre msiomies avec un autre 
programme en place. 

464: Vousn'avez pas besoin de specifier denomdeficWer si voussouhaitez charger le 

premier fichier se trouvant snr ]& cassette. 

On voos demandera de : 

Press PLAY then any key 

um&mmmtm cr*ap«f*3P*g<*i4§ 



... apres quoi vous devrez appuyer sur la touche PLAY do lecteur de cassette. puis sur unedes 
touches de 1* ordinateur. La bande dans la cassette commencera a touroer, et l'ordinateur cbargera 
te fichier concern^. 

L'ecran aflBchera le message de chargement : 

Loading FILENAME block 1 Y AJJ 

. . .et ce autant de fois qu'il y a de blocs dans un fichier, jusqu'a ce que le fichier soit charged 

Si le premier caractere du nom de fichier est ! alors le message ci-dessus sera supprime\ et on ne 
vous demandera pas de "press any key for the file to load." ( Vous devez vous assurer que la touche 
PLAY du lecteur de cassette est enfoncee). Si votre programme utilise le signe ! et sont egalement 
oecessaires pour exploiter la disquette. le signe ! sera ignore" pendant le traitement de la disquette 
(lors de la lecture du nom de fichier du disque). Notez que le signe I ne peut PAS remplacer on 
caractere dans le nom de fichier d'une cassette ou d'un disque 
Le fait d'appuyer sur la touche [ESC] produit un message d'erreur affichd a recran. 

Broken in 
Mots cl6s assocres : CHAIN, CHAIN MERGE. LOAD Yfxi ^HSi' 

MID$ M 

MIDI (<ehatae aJphanum6rique>,<^osition de <Wparr>[,<tongiieur de la soot- 
chame>]) 

10MODE1:ZONE3 

20 a$-"ENCYCLOPEDIE H 

30 PR INT " Regardez com merit epeler ";a$ 

40 PRlNT M OK....":PRlNT H? 

50 FOR n-1 TO LEN (a$) 

60 PRINT MID^aS.n,!), 

70 FOR t-1 TO 700:NEXT tn 

80 PRINT:PRINT tiM 

90 INPUT "entrez un nouveau mof ;a$ . , . , , *.. . - r -> 

100 GOTO 50 

run 

FONCnON : Renvoie une nouvelle sous-chatne commencant a la position <position de depart> 
de la <chatne alphanumftriquo et contenant le nombre de caracteres correspondants a la lon- 
gueur de la sous-chalne>. Si le parametre <longueur de la sous-chalne> n'est pas specific, la 
fonction renvoie le reste de la <chalne alphanumenque> a partir de la <position de depart>. 

Si la <positioD de d6part> est sup6rieure a la longueur totale de la <chatne alphanum6rique>, une 
chatne vide est renvoyee. La <position de depan> est comprise entre 1 et 255, la <longueur de la 
sous-cha1ne> entre et 255. 

Mots cl6s associds : LEFTS, RIGHTS ffjH 
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MID$ 

MID$ (<variable chalne>, <position d'msertion> [,< longueur de la nouvelle 
chatne>]) =<nouvelle chaine alphanum6rique> 

10a$»"bonjour" 

20 MID$ (a$,3 r 2KXX" 

30 PRINT a$ 

run '"■' 3KJ. ■■'•'■ : 

boXXour 

. *■» . ' -■■ '~~- 

COMMANDE : Ihsere dans la chaine specifiee uae <nouvelle chaine alphanurnenque> d'un 
nombre de caracteres donne\ a la <position d'inseition>. 

Lorsque vous uttlisez MID$ en tant que COMMANDE, vous devez faire appel a une <variable 
chalno, tel que A$, et non PAS a une constante comme 'toujour". 

Mots cWs associ&> : LEFT$, RIGHTS 



M|N - ■ -:.. ■'-■■■—■ 

MIN (<liste de:<expression niim6rique>) ...,,,., .li 

PRINT MIN(3,6,2.999,8,9.) '« 

2.999 ** 

FONCTIONiDormebvakurlaplm petite (MINiri^ 
Mots cles associes : MAX 



MOD 

<argument 1> MOD <argument 2> 

PRINT 10 MOD 3 

1 * 

PRINT 10 MOD 5 * 

*" **■" *-s =■"■?-.* ■«■.:> • ■■ ■ - \,t*, t+f$Jf 

OPERATEUR : Donne le reste de la division entiere de l'<argument 1> par r<argument 2> (on 
dit <argument 1> MODulo <argument 2>). 

Mots cles associes : Aucun 
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MODE 

MODE <nombre entier> 

10 n-m+1:IF m>2 THEN m-0 

20 MODE m 

30 PRINT "Ceci est le mode";m 

40 PRINT "Pressez une touche" 

50 IF INKEY$- HH THEN GOTO 50 ELSE 10 

run 

COMMANDE : Modifie lc mode d'ecran (0,1 ou 2) ct retablit sur recran Tencie 0, mtae si 
Pencre actuellement utilisee par te papier est differente. Toute les fenetres et curseurs aont 
raoltialis^s. 

Mots cles associes : WINDOW, ORIGIN 



MOVE 

MOVE <cocwdonnee x>,<coordonn6e y>[,[<encre>][,<mode d'encrO]] 

10MOVE1:TAG 

20 x-RND*800-100:y-RN[>430 

30MOVEx,y t$£ 

40 PRINT "je sufe Id"; 

50 GOTO 20 

run 

COMMANDE : Positionne le curseur graphique au point absolu spddfie'.Leparametrefecultatif 
<encre> (compris entre et 15) pennetde changer la couleurdu stylo graphique. 

Le parametre facultatif <mode d 'encro determine 1'interaction de l'encre sur l'affichage en place 
a Tecran. n existe 4 <modes d'encro ; 



0: 


Normal 


1: 


XOR (OU exclusif) 


2: 


AND(ET) 


3: 


OR(OU) 



'•• GO!-' 
Mote clea anodes : MOVER, ORIGIN, XPOS, YP08 
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MOVER 

MOVER <decalage x>,<d6calage y>[,[<encre>][,<mode d'encrO]] 

10 MODE 1:TAG:MOVE 0,18 

20 PRINT "la vie a ses"; 

30 FOR n-1 TO 10 

40 MOVER -45,16 

50 PRINT "hauts";:NEXT:PRINT" et"; 

60 FOR n-1 TO 10 

70 MOVER -64, -1 6 k x U^) U -.. . u . 

80 PRINT H bas H ;:N EXT Mil 

run 

(X)MMANDE:PositioiiiieleCBiieur graphing 

actaelle). Le parametre facultatif <encre> (compris entre ct 15) permet de changer la couteur 

du stylo graphique. 

Lc parametre fecultatif <mode d'encrO determine l'interaction de rencresuri'affichage en place 
a l'ecran. n existe 4 <modes d'encre>: 

T0H 



0: 


Nonnal 


1: 


XOR(OUexclnsif) 


2: 


AND (ET) 


3: 


OR(OU) 



Mots desassoctfa: MOVE, ORIGIN, XPOS.YPOS H J 

HEW ^KSTOP t "" i '"" 

NEW 

NEW JO , ~ „ 

COMMANDE : Efface le programme et tes variables en memoire. Les definitions de touches ne 
•out pas eflacees et I'affichage teste ce qu'il Ctait (MODE, PEN, PAPER, INK etc.) 

Moto cles associds : Aucun 

TK10£ ( AO 
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NEXT * ■ 

NEXT [<liste de:<variable>] 

10FORa-1 TO 3 

20 FOR b-0 TO 26 

30 MODE 1 

40 PEN a:BORDER b 

50 PRINT "PEN";a;"BORDER",b '"- 

60 FOR c-1 TO 500 

70NEXTc,b,a 

run 

COMMANDS : Manjue la fin d'une boucle commencee avec FOR. La commande NEXT peut 
etrc anooyme ou peut se rapporter au FOR conceme\ Dans l'exemple ci-dessus, la <Uste 
dc-variablo doit apparattre en sens inverse de la specification des commandes FOR, afin d'6viter 
lechevaucbement des boucles imbriquees. 

Mots cles associ6s : FOR, STEP, TO ~mi t ^Juudtea^s- 

NOT 

~M --:a 

NOT <argument> -iq /€ 

IF NOT "alain" < "bemard" THEN PRINT "vrai" ELSE PRINT laux" faux 
IF NOT "chat" > "chien" THEN PRINT "vrai" ELSE PRINT "faux" vrai 

PRINT NOT -1 Ifc-v 



PRINT NOT 

-1 

OPERATEUR : Execute des operations par bit sor des enters. Inverse chaqoe bit de l'argument 
Pour de plus amples informations, consuitez la partie 2 du cbapitre "A vos heures de loisir..." 

Mots elds associes : AND, OR, XOR 

ON BREAK CONT 

ON BREAK C0NT 

10 ON BREAK CONT 

20 PRINTTe programme CONTinuera si vous essayez de faire *Break* avec la 

touche [ESC]":PRINT 

30 FOR t-1 TO 1000:NEXT:GOTO 20 

run 
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COMMANDS : Annule Taction de la touche [ESC], empechant l'anftt do programme. Cette 
commande est a utiliser avec precaution car le programme ne peut alors fitre interrompu que par 
reinitialisation complete de Fordinateur (vous devez done sauvegarder le programme avant de le 
lancer). 

Vous pouvez d6sactiver ON BREAK CONT par ON BREAK STOP a rintfrieur d'un pro- 
gramme. 
Mots elds associes : ON BREAK GOSUB, ON BREAK STOP 



ON BREAK GOSUB 

ON BREAK GOSUB <num6ro de ligne> 

10 ON BREAK GOSUB 40 

20 PRINT "le program me toume" 

30 GOTO 20 

40 CLSPRINT "Appuyer 2 fois [ESC],"; 

50 PRINT "appelie le sous-programme" 

60FORt=1 TO 2000 NEXT 

70 RETURN 

run 

COMMANDE : Demande au BASIC de passer au sous-programme specififi par le <nume*ro de 
ligne> lorsque vous appuyez deux fois sur [ESC]. 

Mots cl& associds ; ON BREAK CONT, ON BREAK STOP, RETURN 



ON BREAK STOP 

ON BREAK STOP 

10 ON BREAK GOSUB 40 

20 PRINT "le programme toume" 

30 GOTO 20 

40 CLS: PRINT "Appuyer 2 lois [ESC},"; 

50 PRINT "appelie le sous-programme" 

60 FOR t=1 TO 2000: NEXT 

65 ON BREAK STOP 

70 RETURN 

Run 

COMMANDE : d6sactive les commandes ON BREAK CONT et ON BREAK GOSUB pour 
pennettre l'arret du programme sur activation de la toucbe [ESC]. Dans l'exemple ci-dessus, la 
commande ON BREAK GOSUB ne fonctionne qu'une seule fois car elle est d6sactivee a la ligne 
45 dans le sous-programme ON BREAK. 

MotscUs associds : ON BREAK CONT, ON BREAK GOSUB 



jtte dee mots d6s Chapftre 3 Page 1 51 



ON ERROR GOTO 

ON ERROR GOTO <numero de ligne> 

10 ON ERROR GOTO 60 

20 CLS: PRINT "Si une erreur esttrouvee, "; 

30 PRINT "alors LlSTer le programme 

40 FOR t-1 TO 4000:NEXT 

50 GOTO 100 

60 PRINT "Erreur detectde k la Hgne"; 

70 PRINT ERL:PRINT:LIST 

run 

COMMANDE : Passe a la ligne specifiee aussitot qu'une errenr est detectee. 

La commande ON E RROR GOTO desactive le deroutementdu programme surerreur et re^ablit 
le iraitement normal des erreurs par le BASIC. 

Voir egalement la commande RESUM E 

Mots cits associes : DERR, ERL, ERR, ERROR, RESUME 

ON <expression> GOSUB 

ON <seTecteur> GOSUB <liste de:<mimero de ligne> 

10 PAPER 0:PEN1:INK 0,1 

20 CLSrPRINT" MENU ":PRINT 

30 PRINT"1 - Changer lecadre H :PRINT 

40 PRINTS - Changer le stylo": PR I NT 

50 PRINT'S - Changer de mode H :PRINT 

60 INPUT "Voire choix";x 

70ONxGOSUB90,110,130 

80 GOTO 20 

90 b-b-1:lF b<0 THEN b-26 

100 BORDER brRETURN 

11 p-p-1 :IF p<2 THEN p-28 

120INK1,p:RETURN 

130 m-m-1:IF m<0 THEN m-2 

140 MODE mrRETURN 

run 



^-' -".tar-" 
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COMMANDE : Selectionne une ligne de sous-programme en fonction de la valeur du <selecteur> 
(Dombre entier compris entre et 255). L'ordre des valeurs des <selecteurs> a^tenrrine le numero 
de ligne a extraire de la liste <liste de:<num6ro de lignes>. Dans rexemple ci-dessus : 

1 provoque le passage a la ligne 90 

2 provoque le passage a la ligne 1 10 

3 provoque le passage ft la ligne 1 30 

Sicette expression estegale a zero, ou si elleest supeneure au nombre de lignes de la liste specifiee 
dans la commande, la selection u'a pas lieu. 

Mots cles a$soci£s : RETURN 



ON <expression> GOTO 

ON <s61ecteur> GOTO <liste de:<num6ro de Ugne> 

10 CLSPRINT "MENU OF OPTIONS n :PRlNT 

20 PRINT "1 - List program" : PR I NT 

30 PRINT "2 - EDITe pour corriger:PRINT 

40 PRINT "3 - Fait le CATalogue H :PRINT 

50 INPUT "Votrechoix";n 

60 ON n GOTO 80, 90, 100 

70 GOTO 10 

80 LIST 

90 AUTO 

100 CAT M ,:.... rifie5r „ 

run 

COMMANDE : SeTectiomrc une ligne ft laqre 

do <selecteur> (nombre entier compris entre et 255). L'ordre des valeurs du <s61ecteur> 

determine le numero de ligne a extraire de la <Hste de:<numero de ligne*>. Dans l'exemple 

ci-dessus: 

1 provoque le passage ft la ligne 80 

2 provoque le passage ft la ligne 90 

3 provoque le passage ft la ligne 100 

S cette expression est egale a z6ro, ou si elle est supeneure au nombre de lignes de la liste specifiee 
i la commande, la selection n'a pas lieu. 



Mots des associes : Aucun 
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Ko du ficbier, etaffiche a nouveau : 

Press REC and PLAY then any key : 

.. .et sauvegaidez les deux prochains Ko sur la cassette. 

Si k ficbier tampon est presque plein et si vous rencootrez la canmandeCLOSEO^rcrftoa- 

Press REC et PLAY then any key : 
Puis recran afficbera te message de sauvegarde : 
Saving FILENAME block <x> 

cassette ou d'un disque. 

Le fait d'appayer sur la toucbe [ESC] produit afficbe un message d'erreur a l'tav : 

Broken in 
Mots ckJs associes : CLOSEOUT 



OR 



<argument> OR <argument> 

iF "alain" < "bernard" OR "chien" > "chat" THEN PRINT "vrai" ELSE PRINT 

F^rcl" < "alain" OR "chat" > "chien" THEN PRINT W ELSE PRINT 

KiK-bemaid- OR "chaf > "chien" THEN PRINT "vrai" ELSE PRINT 
"faux" vral 

PRINT 1 AND 1- 

PRINT AND 



PRINT 1 AND 

1 
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COMMANDE : Execute en langage machine des operations booleennes sur desentiers. Donne 1 
dans tous Jescas sauf si les deux arguments sontegaux aO. Pour de plus amples informations sur 
la logique, coosuUez la partie 2 du chapitre " A vos heures de loisir..." 

Mots cKs associes : AND, NOT, XOR 



ORIGIN 

ORIGIN <x>,<y>[,<gauche>,<droite>,<haut>,<bas>] 

MODE 1:BORDER 13:TAG 
20 ORIGIN 0,0,100,540,300,100 
30 GRAPHICS PAPER 3:CLG 
40 FOR x-550 TO -340 STEP -10 
50 MOVE x,206 

60 PRINT* Void une fenetre graphique "; 
70 FRAME:NEXT:GOTO 40 
run 

COMMANDE : Etablit le point d'origine du curseur graphique aux coordonnees <x>, <y> 
specifies. Vous pouvez egalemeot fixer les dimensions de la fenetre graphique par specification 
des quatre demiers parametres facultatifs. Si les coordonnees specifiees pour la fenetre graphique 
k trouvent en dehors de 1'ecran, les bords de 1'ecran sont alors coosideres comme les limites de 
1* fenfttre. 

Mots cles associes : CLG 



OUT 

OUT <numero du port>, <nombre entier> 

OUT&F8F4.&FF 

COMMANDE : Envoiela valeurdu <nombreentier> (entreO et255) vers le port de sortie precise* 
parsonadresse. 

Adtojoseilleraux utilisateurs peu avertis 

i des associes : INP, WAIT 
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PAPER 

PAPER [#<numero du canal>,]<encre> 

10 MODE OPEN 0:INK 0,13 

20FORp-1 TO 15 

30 PAPER p:CLS 

40 LOCATE 7,1 2:PRINT"PAPER";p 

50 FOR t-1 TO 500:NEXTLp 

run 

COMMANDE : Etablit la couleur du food pour les caracteres. Lore de VdmcYa ^^^^ 
sur l'ecran, sa matrice (la griUe) estremplie par l'<eacre> correspondant au papier (PAPER ink.) 
avant qu'il ne soit lui-m&ne affiche (sauf en cas de mode transparent). 
Si le <numero de canal> n'est pas specifie, le canal #0 est pris par defauL 
Le nombre de couleurs disponibies depend du mode cboisi. 
Mots cles assoctes : INK, GRAPHICS PAPER, PEN 

PEEK 

PEEK (<adresse>) 

10 MODE1.ZONE 7 

20 WINDOW 1, 40, 1, 2:WINDOW#1, 1, 40,3, 25 

30 PRINT M Adresse m6moire" 

40 LOCATE 20,1:PRINT"Contenu m6moire" 

50 FOR n-0 TO 65535 
60p-PEEK(n) 

70 PRINT #1,n/ l (&";HEX$(n);T; 

80 PRINT #1 ,TAB(20);p, H (&";HEX$(p);T 

90 NEXT 

run 

FONCTION : Lit le contenu de la case memoire Z80 dont r<adresse> est indiqufc entre 

p^^.Cetteadressedo^^ 

que sur la memoire vive (RAM), jamais sur la memoire morte (ROM), et foumit des valeurs 

comprises entre &00 et &FF (0 et.255). 
Mots cl6s associes : POKE 



PageiSSGW*«i*3 -umtimm*** 



PEN 

PEN # [<numero de canal>,K<encre>][,<mocle du fond>] 

10 MODE OrPAPER 0:INK 0,13 

20 FOR p-1 TO 15 

30 PEN prPRINT SPACES (47);"PEN";p 

40 FOR t-1 TO 500:NEXT tp:GOTO 20 

run 

COMMANDB : Selectioone r<encre> * utfliser (dc a 15) pour ecrire sur le canal indiqu6 (par 
dtfaut #0). Le parametre <mode du fond> peut etre soit transparent (1), soit opaque (0). 

Au mains un des deux demiers parametres doit figurer. Si l'un deux est amis, sa valeur anteneure 
reste inchangee. 

Mots cles assoctes : PAPER 

PI 

PI 

PRINT PI 
3.14159265 

FONCITON: Foumit la valeur du rapport circonference-diainetre d'un cercle. 
Mots cl6s associfo : DEG, RAD 

PLOT 

PLOT <coordonnee x>,<coordormee y>[,[<encre>][,<mode d'encre>]] 

10 MODE 1:BORDER OrPAPER 0:PEN 1 

20 INK O.OrINK 1 ,26:INK 2,13,26:DEG 

30 FOR x-1 TO 360:ORIGIN 320,200 

40 DRAW 50*COS(x),50-SIN(x),1 

50 PLOT 100*COS(x),25*SIN(x):NEXT 

60 ORIGIN 0,0rt-TIME+700:WHILE TIME<t 

70 PLOT RND*640,RND*400:WEND 

80 PLOT RND*640,RND*400,2 

90 GOTO 90 

run 

COMMANDE : Affiche, en mode graphique, te point de ax)«kHmeesxety.Ond6finitr<encre> 
de ce point sur uue dchelle de a 15. 
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Ix panunfete fecultatif <modc d'eixa^ ddtamiw 
et celle de I'ecran. Void les quatrc modes possibles : 

0: Normal 

1: XOR (OU exclusif) 

2: AND(ET):OR(OU) 

Mots cles associes : GRAPHICS PEN, PLOTR 



PLOTR 

PLOTR <decalage x>,<decalage y>[,[<encre>][,<mode d'encre>T] 

10 REM utilisez le pave curseur pour destrier 

20 BORDER 0:GRAPH!CS PEN 1 

30 MODE 1 :PLOT 320,200 

40 IF INKEY (0)-0 THEN PLOTR 0,1 

50 IF INKEY (1)-0THEN PLOTR 1,0 

60 IF INKEY (2)-0 THEN PLOTR 0,-1 

70 IF INKEY (8)-0 THEN PLOTR -1,0 

80 IF INKEY (9)-0 THEN 30: REM copy-clear 

90 GOTO 40 

run 

COMMANDE : En mode graphique, affiche a I'ecran le point de coordonnees x et y ***&** * 
la position du curseur a ce moment On d6firat l'encrO de ce point sur une echelle de a 15. 

Le parametre facultatif <mode d'encro definit le mode ^interaction entre la couleur utilisee et 
celle de recran. Voici les quatre modes possibles : 

0: Normal 

1: XOR (Ou exclusif) 

2: AND(ET) 

3: OR(OU) 

Mots cles associes : GRAPHICS PEN, PLOT 



POKE 

POKE <adwsse>,<nombre entier> 

10 FOR m-40152 TO 65535 

20POKEm,100 

30 NEXT 

run 
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COMMANDE : Inscrit la valeur correspondant au <nombre eotier> (compris cntre et 256) 
directement dans la case de la memoire vive (RAM) du Z80 dont r<adresse> est .ndiquee. 

Commande a utiliser avec precaution ! 

Motscles associes : PEEK 



POS 

POS {#<numero de canal>) 

10 MODE 1:BORDER 0:LOCATE 8,2 

20 PRINT "utilisez les fleches droite/gauche" 

30 WINDOW 1 r 40,12,12:CURSOR 1,1 

40 FOR n-1 TO 1 9:PR!NT CHR$ <9);:NEXT 

50 IF INKEY (1)<>-1 THEN PRINT CHR$(9); 

60 IF INKEY (8)<>-1 THEN PRINT CHR$(8); 

70 LOCATE #1 £24 

80 PRINT #1,"curBeur texts,"; 

90 PRINT #1 , position horizontals-"; 

100 PRINT #1, POS (#0):GOTO 50 

run 

FONCITON : Calcule la POSition du curseur texte sax l'axe horizontal, a parth* du bord gauche 
de la fenette. Le <numeio de canal> doit obligatoirement etre precise^ il ne prcnd pas la valeur #0 
pardefaut 

POS (#8) calcule la position horizontale du chariot de rimprimante par rapport a la marge de 
gauche (coordonnee 1). 

POS (#9) calcule la position logique du canal d'unite de disquettes, c'est a dire le nombre de 
caracteres transmis depuis le dernier "retour chariot". 

Mots cl&j associes : VPOS, WINDOW 



PRINT 

PRINT [#<&umero de cana^Jt^ste de:<article a imprimer>] 

lOaVpetits" 

20 b$-"Ceci sst une longue chatns ds caracteres" 

30 PRINT a$;a$ 

40 PRINT a$;a$ 

50 PRINT 

60 PRINT b$,b$ 

70 PRINT b$,D$ 

run 
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COMMANDB t T^ansmet la liste cteorticle a imprirner>ouaaffichcrsurlecaiialiDdi<io6,(«) 

parddfeut). 

Le point-virgule indique a l'ordinateur qu'un article doit erre irnprime j?^^* * ^jf* 

du prfcedeat Toutcfois, s'il est Hop long pour tenir sur la men* ligDcl'ordmateur passe tout de 

memealaligne. 

La virgule indique qu'un article doit etre position* a la tabulation ™™*^ r ^™>* 
rimp^n ou 1'affichage de Particle precedent diborde sur la tabulation indiquee, 1 ordinateur 
decale k nouvel article d'une tabulation supplementaire. 

PRINT SPC 
PRINT TAB 

PRINT [#<numero de canal>,][<liste de:<article a irnprimer>] , 

[;][SPC(<nombre entier>)][<liste de:<article a imprimer>] j 

PRINT [#<numero de canal>,][<liste de:<article a imprimer>] 
[;] [TAB (<nombre entier>)] [<liste de:<article a imprimer>] 

10 PRINT "Ceci est I'instruction SPC H 

20 FOR x-6 TO 15 

30 PRINT SPC (5)"a";SPC (x);"b H 

40 NEXT 

50 PRINT "Ceci est I'instruction TAB M 

60 FOR x-6 TO 15 

70 PRINT TAB(5) H a w ;TAB(x);"b" 

80 NEXT 

run 
SPC menage le nombre d'espaces vides indiqud par le <nombre entier> avan J. ^nprimer ou 
d'afficher ^article indiqud, a condition que ce dernier tienne integralement sur la hgne. H est done 
inutile d'utiliser le point-virgule avec la commande SPC. 

TAB menage, a partir de la marge gauche, le nombre d'espaces vides ^ff^ d ^^Z 
ou d'afficheV l'article design*, a condition que ce dernier tienne sur la bgne^Le ^"V^gule est 
done inutile apres TAB. Si k curseur a deja depasse la position demandee, un changement de 
ligne est effectud avant la tabulation. 



iiUl 
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PRINT USING 

PRINT [#<3iumero de canal>][<liste de:<article a imprimer>][;] 
[USING <modele de forrnat>][<separateur> <expression>] 

10 FOR x-1 TO 10 

20n-100000*(RNDt5) 

30 PRINT "marchandise^USING " ///// / < // / ttllll ,1Wy\ 

40 NEXT *■»!»* 

run 

PRINT USING permet de derlnir le format d'impression ou d'affichage d'une expression 
transmise par la commande PRINT. On ddfinit pour cela le <modele de format> sous lequel on 
desire voir apparaltre l'expression. On utilise comme <separateur> soit une virgule, soit un 
point-virgule. Le <modele de fonnat> est une chatne de caracteres composee des <indicateurs de 
champs> suivants : 

FORMATS NUMERIQUES 

Dans un nombre : 

Encadrement d'un nombre : 

££ (Reserve deux espaces). Indique que le signe £ apparattra immediatement avant le 

premier chiftre ou le point decimal, c'est-a-dire sur 1'un des emplacements reserves 
aux cbifrres. 
Exemples : ££######,.## 

•* (reserve deux espaces). Indique que tous les espaces vides situes avant le nombre 

seront combles par les asterisques. 
Exemple :**######,.## 

•H (Reserve trois espaces). Addition les options ** et ££, c'est-Mire les astfrisques 

en tete et le signe £ precedant immematement le nombre. 
Exemple : **£######.## 

H (Reserve deux espaces). Indique que le signe $ apparattra imm6diatement a gauche 

du premier cbiffre ou du point decimal, c'est-a-diie sur 1'un des emplacements 

reserve's aux chiffres. 
Exemple : $$######,.## 

••$ (Reserve trois espaces). Additionne les options ** et $$, c'est-a-dire les asterisques 

en tete et le signe $ precedant imm6diatement le nombre. 
Exemple :**$######,.## 

♦ Indique qu'on desire voir figurer le signe du nombre. ce signe apparattre avant le 

nombre si le + est situe au debut du <modele de format> et apres le nombres s'il est 
situ6 a la fin. 
Exemple : +####.#### 
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le signe - ne peut figurer qu ' A LA FIN du masque, n demande la presence du signe 
- apres tout nombre ou tout exposant negatif s. En l'absence de cette specification, 
le signe - apparaltre par detaut avant le nombre negatif . 
Exemple : ####.####- 

TTTT Indique que le nombre doit apparaltre en exposant Les signes TTTT se placent 

APRES le dernier emplacement des chiffres, mais AVANT tout signe + ou - 
final^xemple : #.####TTTT+ 

La longueur maximale du <modele de format> d'un nombre est de 20 caracteres. Les nombres 
sont arrondis au nombre de signes indiqu6. 

Si un format est trop petit pour contenir 1'expression saisie : 
PRINT USING "a***'; 12345678 

. . .celle-ci n'est pas tronquee, mais apparalt dans sont integrautfi, prec6dee du signe % indi q uan t 
un <format errone>. 

Format d'une chaTne alphanum6rique 

10 CLS : a$-"abcdefghijklmnopqrst" 

20 PRINT "chaTne alphanum.-";a$ 

30 PRINT:PRINT "Avec ! -"; 

40 PRINT USING T;a$ 

50 PRINT: PRINT "Avec Vespaces\ •"; 

60 PRINT USING "\ V';a$ 

70 PRINTrPRINT "Avec & - "; 

80 PRINT USING "&";a$ 

90 GOTO 90 

run 

! indique que seulte premier carad^dteUchatae doit apparaftre. Exemple : ! 

Ycespaces>\ Indique que seuls les x premiers caracteres de la chatoe doivent apparaltre, x 6tant 
egal a la longueur du format (banes comprises). 

& Indique que la cnalne doit apparaltre "telle quelle". Exemple : & 

Le <modele de formaO peut fttre represente" par one variable alphanumenque, comme le montre 
rexemple suivant : 

20b$-T 

30 PRINT USING a$;1 2345.6789; 

40 PRINT USING b$;"cerrtfmes" 

run 
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Pour plus de details conceraant les formats, voir la deuxieme parte du chapitre intitule" "A vos 
beures de loisir...." 

Mots cles associes : SPC, TAB, USING, ZONE 



RAD 

RAD 

RAD 

COMMANDE : Etablit le mode de calcul en RADiaus. En BASIC, il est adopt6 par d6faut 
Mots cl6s associes : ATN, COS, DEG, SIN, TAN 

RANDOMIZE 

RANDOMIZE [<expression mimenque>] 

RANDOMIZE 123.456 
PRINT RND 
0.258852139 

COMMANDE : Donne une valeur al6atoire calculee a partir de r<expression numeriquo 
indiquee. Legenerateur de nombres aleatoires foumit une sequence pseudo-aleatoire dans laquelle 
chaque norabre depend du precedent La sequence elle-metne est pr&leterminee. Si la valeur 
initiale n'est pas preosee dans la commande, e*est l'utilisateur qui rentrera en cours d'execution. 
RANDOMIZE TIME foumit une sequence pratiquement imprevisible. 

Mots cles associes : RND 



READ 

READ <liste de:<variable> 

10FORn-1TO8 

20 READ 8$ c 

30 PRINT a$V ";:SOUND 1.C.NEXT 

40 DATA voici, 478,les,426,8,379,notes 

50 DATA 358,de,319,la^84,gamme,253,239 

run 

COMMANDE : lit les donnees contenues dans une instruction DATA et les assigne a des 
variables. READ passe automatiquement d'une donnee a la suivante. La commande RESTORE 
permet de revenir a une commande DATA anterieure. . 1U A % ,_. 
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1 

De plus amples informations concernant DATA peuvent fttre trouvees dans la deuxieme partie du 
chapitre intitule 1 "A vos neures de loisir ...." 

Mots cl6s associes : DATA, RESTORE ^ 

i 
] 

RELEASE j 

RELEASE <canaux sonores> 

10 SOUND 65,1000, 100 j 

20 PRINT "appuyez [R] pour liberer la note" ] 

30 IF INKEY (50)-1 THEN 30 j 

40 RELEASE 1 I 
run 

COMMANDE : Libere les canaux sonores bloques par la commande SOUND. 

Le parametre <canaux sonores> prend les valeurs suivantes : 

1: Iibere le canal A j 

2: Iibere le canal B j 

3: Libere les canaux A etB } 

4: Libere le canal C | 

5: Libere les canaux A et C i 

6: Libere les canaux B et C 

7: Libere les canaux A, B etC 

Pour en savoir plus sur le mode sonore, consultez la deuxieme partie du chapitre intitule : "A vos , 
heures de loisir...." 

Mots cles associes : SOUND 



REM 

REM <texte> 

10 REM CHASSE AUX ENVAHISSEURS DANS L'HYPERESPACE INTERGA- 

LACTtQUE 

20 REM COPYRIGHT by AMSOFT 

COMMANDE : Insere une R EMarque dans le programme. BASIC ne tient pas compte du <texte> 

situ6 sur la ligne a droite de REM, meme si celui-ci coraprend un separateur d'instructions ":" ou 

tout autre code. 

On peut remplacer :REM par une apostropbe ' dans tous les cas, SAUF a l'interieur d'uns 

instruction DATA. 

Mots cles associ6s : Aucun 
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REMAIN 

REMAIN (<numero de chronometre>) 

10 AFTER 500,1 GOSUB40 
20 AFTER 1 00,2 GOSUB 50 
30 PRINT' Le programme tourne n :GOTO 30 

40 REM ce sous programme ne sera plus appele dans la mesure oti II a 6te ren- 
du inoperant en ligne 80 
50 PR!NT:PRINT H Le chronometre 1 va "; 
60 PRINT "etre supprime par REMAIN." 
70 PRINT "il restaif 

80 REMAlN(1);"unites de temps au chrono 1 
run 

FONCTION : lit le temps restant a decompter par le chronometre indique' (de a 3), avant de 1< 
desactiver. Pour plus de details concemant les interruptions, consultez la deuxieme partie di 
chapitre "A vos heures de loisir..." 

Mots cles associes : AFTER, DI, El, EVERY 

RENUM 

RENUM [<nouveau numero de ligne>][,[<ancien numero de ligne>] 
[,<incr6ment>]] 

10CLS 

20 REM cette tigne deviendra:ligne 123 

30 REM cette ligne deviendratiigne 124 

40 REM cette ligne devlendra:llgne 125 

RENUM 123,20,1 .A^., 

LIST 

COMMANDE : RENUMerote les lignes d'un programme, 

L*<ancien numero de lignoest unparametre inflquantlalignefaprogrammealaquelleondesin 
ammencer la numerotation. En 1 'absence de ce parametre, toutes les lignes du programme seron 
itnumerotees. Le <nouveau numdro de ligne> indique le nouveau numero de la premiere lignt 
Kaamerotee (10 par defaut). L'<increment> indique respacement desirt entre deux lignes (1( 
mw deTaut). RENUM opere les reajustements necessaires a I'intdrieur des instructions d'appe 
id to que GOTO et GOSUB. En revanche, il laisse inchangd les numeros de lignes contenus dan 
4es chatnes de caracteres apparaissant dans les commandes KEY.REM, CHAIN et CHAfo 
MERGE. Les numeros de lignes doivent etre compris entre 1 et 65535. 
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RESTORE 

RESTORE [<num6ro de ligne>] 

10READa$:PR!NTa$;""; 

20 RESTORE 50 

30 FOR t-1 TO 500:NEXT:GOTO 10 

40 DATA les data recuperees peuvent 6tre lues encore 

50 DATA et encore 

run 

COMMANDS : Ramene le pointeur sur 1 'instruction DATA indiquee. En 1* absence <te parametre, 
le pointeur retourne a la premiere instruction DATA du programme. 
Pour plus de details, consultez la deuxieme partie du chapitre "A vos heures de loisir,..." 
Mots cles associes : DATA, READ 

RESUME 

RESUME [<num£ro de ligne>] 

10 ON ERROR GOTO 60 '■" 

20 FOR x=1 TO STEP-1 :PRINT 1/x:NEXT 

30 END ' r 

40 PRl NTje viens id en cas d'erreur" 

50 END 

60 PRINT "erreur N.";ERR;" a la llgne";ERL 

70 RESUME 40 

run 

COMMANDE : Reprend rexecution d'tra programme apres la detection et le tnritemeot d'une 
exreur par la commande ON ERROR GOTO. Si aucun <numero de ligne> n'est indique, 
l'execution du programme reprend a la ligne contenant l'erreur d£tectee. Supprimez ce parametre 
dans l'exemple ci-dessus, puis faites toumer le programme. 

70 RESUME 
run 

Mots cles associes : DERR, ERL, ERR, ERROR. ON ERROR GOTO RESUME, NEXT 
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RESUME NEXT 

RESUMENEXT 

10 ON ERROR GOTO 90 

20 PRINT "tapez [ENTER] a chaque fois" 

30 INPUT "1";a 

40 INPUT "2";a 

50 INPUT "3";a:REM erreur de syntaxe 

60 INPUT "4";a 

70 INPUT "5";a 

80 END 

90 PRINT "erreur N. M ;ERR; fl a la ligne";ERL 

100 RESUME NEXT 

run 

COMMANDE : Reprend l'execution d'un programme apres la detection et le traitement d'une 
erreur par la commande ON ERROR GOTO. 

L'execution dn programme reprend a partir de la ligne suivant immftliatement la ligne erronee. 

Mots ckSs associes : DERR, ERR, ERROR, ON ERROR GOTO, RESUME 

RETURN 

RETURN 

10 GOSUB 50:PRINT "Apres le GOSUB":END 

50 FOR n-1 TO 20 

60 PRINT "sous-programme" 

70NEXT:PRINT 

80 RETURN 

run 

COMMANDE : Indique la fin d'un sous-programme; Apres l'execution d'un sous-programme, 
3ASIC retoume a rinstruction suivant immddiatement l'appel GOSUB correspondant 

Jtottcles associes: GOSUB 
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RIGHTS 

RIGHTS (<cha5ne alphanum6rique>,<longueur requiseo) 

10 MODE 1:a$-"ordinateur 61 28/464+" 

20 FOR n-1 TO 1 6:LOCATE 41-n,n 

30 PRINT "parametre RND=";x 

40 FOR n-1 TO 6 

50 PRINT RND(x) 

60 NEXT n,x 

run 

FONCTION : Extrait on certain nombrc de earaches (eotre et 255) a gauche d'une <chalne 

alphanomeriquo. Si la cnaine est plus courte que la <longueur requiso, elle est uulisee 

entierement 

Mots cles associes : LEFTS, M1D$ 

RND 

RND [^expression numenquO)] 

10 RANDOMIZE 

20torx-1 to-1 step-1 

30 print "parametre RND: ";x 

40 for n-1 to 6 
50 print RND(x) 
60 next n,x 
f\jn 

FONCTION : Foumit le prochain nombre de la sequence pseudo-aleatoire en cours lorsque 

l'<expression numeriquO est positive ou lorsqu'elle ne figure pas dans la commande. 

Lorsque r<expression numeriquO est nulle, RND renvoie le dernier nombre gen6re. 

Une valeur negative de l'<expression numeriquO lance une nouvelle sequence aleatoire dont 

RND fournit le premier element. 

Mots cl6s associes : RANDOMIZE 
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ROUND 

ROUND ^expression mun6rique>{,<siambre de decimales>]) 

10FORn-4TO-4STEP-1 

20 PRINT ROUND (1234.5678,n), 

30 PRINT 'arrondi a";n;"decirnales H 

40 NEXT 

run 

FONCnON : Airondit F<expression numerique> au nombrc de chiffies apres la virgule ou de 
puissances de dix indiqud par le parametre <nombre de decimales>. Si ce parametre est negatif, 
1'expression est arrondie a un entier absolu, suivi d'un nombre ecras6. 

Cette commande permet d'acc&ier directement aux programmes BASIC proteges. 

Mots cl6s associ6s : ABS, CI NT, FIX, INT 

RUN 

RUN <chame alphaniimenque> 

RUN "disc" 

COMMANDE : Charge et execute un programme BASIC ou un programme-objet situ6 sur la 
disquette. Tout programme deja present en memoire est automatiquement ecrase\ 

Cette commande permet d'acc6der directement aux programmes BASIC proteges. 

Mots cles associCs : LOAD 

RUN 

RUN [<numero de ligne>] 

RUN 200 ** 

COMMANDE : Execute le programme BASIC present en memoire, en commencMt an <numero 
de ligne> indiqu6 ou, a defaut, au d6but du programme. RUN reinitialise toutes les variables. 

Cette commande peut ne pas donner acces aux programmes proteges charges en memoire. 

Mots cles associfis : CONT, END, STOP 
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SAVE 

SAVE <nomfich>l,<type de fichk*>][,<parame*n>s binairwO] ? 

SAVE "ficndlsc.xyz" 
.. .sauvegarde le fichier en mode BASIC non V«*& 
SAVE-fichdisc.xyz",? 
.sauvegarde le fichier en mode BASIC Protege 
SAVE "fichdisc.xyz">A 
...sauvegarde le fichier en mode ASCII 

SAVE "fichdisaxyz", EL8000. 3000,8001 

diflerents parametres Binaires : 

< a dresse du debut>,<taille du ficto>[,<point d*entree>] 

nestlXKsibledesauvegarderlan^^ 

SAVE "ecran", B,&COOO,&4000 

Onobtientemuitesonrecha^^^ 

LOAD "ecran" 
^ nn'e^pasne^sairedespedfierdenomsivonsvoulezqaete 

sauvegarde en tant que fichier "sans nom . 
Exemple : 

SAVE"" 
On vous demandera de : 

Press PLAY then any key 

. i« us***,. PI AY dn lecteur de cassette, puis sur une des 

programme. 
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L'ecran afficbera 1c message smvant : 
Saving FILENAME block 1 

. . .et ce antant de fois qu'il y a de blocs dans un fichier jusqu'a ce que le ficMer soft sauvegardd. 

Si le premier caractere du fichier est !, alors le message ci -dessus sera sera supprinteetonnevous 
demandera pas de "Press Any Key" pour charger le fichier. (Vous devez vous assurer que les 
loaches RECORD et PLAY du lecteur est enfoncee). Si votre programme utilise le signe ! 
egakment necessaire pour exploiter la disquette, le signe ! sera ignore" pendant letraitementde la 
disquette (lors de la lecture du nom de fichier du disque). Notez que le signe ! ne peut PAS 
remplacer un caractere dans le nom du fichier d'une cassette ou d'un disque. 

Le fait d'appuyer sur la louche [ESC] produit un message d'erreur a l'ecran : 

Broken in 
Mots elds associes : CHAIN, CHAIN MERGE, LOAD, MERGE, RUN 

SGN 

SGN (<expression numeriquO) 

1 FOR n-200 TO -200 STEP -20 

20 PRINT "SGN renvoi"; 

30 PRINT SGN(n);"pour une valeur de:";n 

40 NEXT 

run 

FONCTION : Etablit le SiGNe de l'<expression numeriquO. SGN renvoie les vateurs : -1 <si 
['expression est negative), (si elle est nulle) et 1 (si elle est positive). 

Mots cles associ6s : ABS 



SIN 

SIN (Expression numenquO 

10 CLS:DEG:ORIGIN 0,200 

20 FOR n-0 TO 720 

30y-SIN(n) 

40 PLOT n*640/720,198«y:NEXT 

50 GOTO 50 

run 

FONCTION : Calcule le SINus de l'<expression numeriquO indiquee. 
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On peut exprimer rargument en degres ou en radians en utilisant, respectivement les fonctions 
DEG et RAD. 

Mots cles associes : ATN, COS, DEG, RAD, TAN 

SOUND 

SOUND <etat de canal>,<periode sonore>[ > <duree>[,<volume>[,<enveloppe de 
volume>[,<enveloppe de tonalite>[,<p^riode du bruit>]]]]] 

10 FOR z-0 TO 4095 
20 SOUND 1,z,1,12 
30 NEXT 

run 

COMMANDB : Permet la prognafcrnittoo d'nn sdti.aTalde des paramtties sntvants : 

Parametre 1 :<etat de canal> 

L'<6tat de canal> admet pour la valeur des entiers compris entre 1 et 255. La conversion en binaire 
de ce parametre donne la signification de chaque bit, selon la table de correspondance suivante : 

B It (1 en deximal): sortir le son sur le canal A (Bit de poids faible) 

Bit 1 (2 en decimal): sortir le sont sur le canal B 

Bit 2 (4 en decimal): sortir le son sur le canal C 

Bit 3 (8 en decimal): rendez-vous avec le canal A 

Bit 4 (16 en decimal): rendez-vous avec le canal B 

Bit 5 (32 en decimal): rendez-vous avec le canal C 

Bit 6 (64 en decimal): bloquer un canal sonore 

Bit 7 ( 128 en decimal): vider un canal sonore (Bit de poids fort) 

L'<6tat de canal> 68, par exemple, aura Feffet suivant : 

Sortie sur le canal C (4), a l'e"tat bloqu6 (64). 

Parametre 2 : <periode sonore> 

Ce parametre etablit la hauteur du son, e'est -a dire la "note" produite (par exemple Do, Re\ ML 
Fa, Sol). Chaque note se definitpar une valeur numenque representant sa <penode sonoro (Voir 
le chapitre "Pour information...") 

Parametre 3 : <duree> 

Ce parametre etablit la longueur, ou 'VJurt" , du son, 1 unite correspond a un centieme de seconde. 
La <duree> du son prend par ddfaut la valeur 20, e'est a dire un cinquieme de seconde. 

En cas de parametre de <duree> nul, la longueur du son sera celle de Fenveloppe de volume 
indiquee. 

Si le parametre de <duree> estnegatif, l'enveloppe de volume sera rep6tee pendant un nombre de 
fois egal a la valeur absolue du parametre. 
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Parametre 4 : <voiume> 

Ce parametre ftablit le volume sonore initial (Time note. H peat prendre une valeur entreO(volume 
mil) et 1 5 (volume maximal). L'ordinateur choisit par deTaut la valeur 1 2. 

Param^tre 5 : <enveloppe de volume> 

n est possible de moduler le volume d'une note durant son execution a I*aide de la commande 
ENV. Cette commande vous permet de d6finir a l'avance un maximum de quinze enveloppes 
differentes, codecs de 1 a 15. Le parametre <enveloppe de volume> de la commande SOUND 
permet ensuite de selectionner une de ces enveloppes pr6d6finies. 

Voir la commande ENV. 

Parametre 6 : <enveloppe de tonalite> 

Des variations de periode, done de hauteur peuvent etre obtenues durant 1 'execution d'une note 
par l*interm6diaire de la commande ENT. Cette commande vous permet de deTinir a l'avance un 
maximum de 1 5 enveloppes de tonalitfs differentes, codecs de 1 a 1 5. Le parametre <enveloppe 
de tonalite> de la commande SOUND permet ensuite de seiectionner une de ces enveloppes 
prddeTinies. Si dans la commande ENT, vous avez utilise" un numero d'enveloppe u6gatif , la valeur 
absoloe de ce nombre devra alors etre prise comme parametre de la commande SOUND. 

Voir la commande ENT 

Parametre 7 : <penode de bmit> 

Vous disposez d'un choix de bmits blancs pouvant fttre ajout£s on supprim6s du signal sdBMn 
l'aide du parametre <periode du bruit> (valeur comprise entre et 31). 

Pour en savoir plus sur le mode sonore, lire la deuxieme partie du chapitre intitule "A vos beures 
de loisir..." 

Mots cl6s associSs : ENT, ENV, ON SQ QOSUB, RELEASE, SQ 



SPACES 

SPACES (<nombre entier>) 

10 MODE 1 

20 PRINTmet 9 espaces entre vous"; 

30 PRINT SPACE$(9); 

40 PRINT'et moil" 

run 

PONCTION : Cree une chame d'espaces de la longueur indiquee (de a 235) 
Mots-cl& associ&j : SPC, STRINGS, TAB 
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SPC 

(VoirPRJNTSPC) 

SPEED INK 

SPEED INK <p6riode 1>,<p6riode 2> 

10 BORDER 7,18 
20FORW30TO1 STEP-1 

30 SPEED INK i,i 

40 FOR t-1 TO 700:NEXTt,i 

run 

CX)MMAhTOB:Peimetd'ttablirbr^oted'ar^^ 

present rutilisarion de deux couleurs inteimitlentes. Les durees respectives d'utilisation de la 
premiere et de la seconde couleur sont indiquees en cinquantiemes de secoodes par les parametres 
<penode 1> et <penode 2>. 

Lors du choix des parametres, pensez aux risques d'effets secondaires hypnotiques ! 

Mots-cies associes : BORDER, INK 

SPEED KEY 

SPEED KEY <d6lal infflai>,<intervalle repetitions 

10 CLS-.FOR k=7 TO 1 STEP -2 

20 PRINP'Entrez votre nom, puisfRETURNf 

30 SPEED KEY k.k 

40 LINE INPUT a$:NEXT 

50 PRlNFquel drOle de nom I" ^ 

run 

COMMANDE : Etablit la vitesse de repetition automatique du clavier. Le parametre <d61ai initial> 
fixe le temps de reaction (mesure en cinquantiemes de secondes) entre 1 'enfoncemeot de la touche 
et le debut de la repetition automatique. L*<intervalle repdtition> etablit le laps de temps separant 
let repetitions. 

Lacommande SPEED KEY ne conceme que les touches pourlesquelles larepetition automatique 
ariste implieitement ou celles pour lesquelles cette fonction a ete programmee au moyen de la 
ammande KEY DEF. 



Page176Crmpftre3 Ltefesgesmoteetts 



Avast de dgfinir une repetition automatique i tres faible <dflai initial, il est prudent de 
pro g ra m m er une des touches numenques afln de pouvoir r&ablir ies parametres par deTaut de la 
fonction SPEED KEY (30,2). Void comment procecler : 

KEY 0, "SPEED KEY 30,2 H CHR$(13) 

n suffira, pour revenir a 1 '6tat initial, d'actionner la louche du pav6 numerique. 
Mots-cl& associes : KEY DEF 

SPEED WRITE 

SPEED WRITE <nombre entier> 

SPEED WRITE 1 

COMMANDE : Indique la vitesse de transmission des donnees de rordinateor vers uo lecteur de 
cassettes du 464, le cas ecbeant Cette vitesse est soit de 2000 bauds (bits par seconde) si le 
parametre est egal a 1 , soit par detaut, de 1 000 bauds si celui-ci est egal a 0. Lors du cbargement 
d'on ficbier enregistre' sur cassette, l'ordinateur choisit automatiquement la bonne vitesse de 
lecture. 

SPEED WRITE est le delrit assurant la meilleure fiabflite de transfert 

La commande SPEED WRITE n'a aucuo eflet sur les acces disque. 

Mots-cfeSs associes : OPENOUT, SAVE 



SQ 

SQ (<num6ro de canat>) 

10 SOUND 65,1 00,1 00 
20 PRINT SQ(1) 
run 

67 

•TJNCTION : Indique I'dtat de la file d'attente (Sound Queue) dans un canal sonore doone\ Le 
<an£ro de canal> doit etre une expression numgriqueentiererjrenantlesvalecirs: 



canal A 
canal B 
canalC 

! tection foumit un entier oorrespondant aux bits de signification suivanta : 
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Bits 0, 1 et 2 : nombrea d'entrees libres dans la file 

Bits 3, 4 et 5: 6tat du rendez-vous au der>ut de la file 

Btt6: latfttedelafileestbloquee v* 

Blt7: le canal est en activity 

. . . on le Bit represente le bit de poids raible, et le Bit 7 cenri de poids fort 

On peut constater que si le Bit 6 est a 1, le Bit 7 ne peut pas l'fitre. De mfime si les Bits 3, 4 ou 5 
sont a 1, les Bits 6 et 7 ne peuvent pas l'etre. 

Pour plus de details, voir la deuxieme partie du chapitre intitute "A vos hemes de loisir" 

Mots-cles associes : ON SQ GOSUB, SOUND 

SQR 

SQR ^expression nume>ique>j 

PRINT SQR(9) 
3 

FONCTION : Fourait la racine carree (SQuare Root) de rexpression numerique indiquee. 

Mots-cles associes : Aucun 

STEP 

(Voir FOR) 

STOP 

STOP 

10 FOR n-1 TO 30.PRINT n:NEXT 

20 STOP 

30 FOR n-31 TO 60:PRINT n:NEXT 

run 

cont 

COMMANDE : Interrompt un programme, tout en laissant a 1'utilisateur la possibilite d'en 
prendre rexecution au moyen de la commande CONT. STOP permet ainsi d'interrompre un 
programme a un endroit donn6 afin d'effectuer une mise au point 

Mots-cles associes : CONT, END 
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STR$ 

STR$ (<expression num6rique>) 

1 a-&FF:REM 255 hexad6cimal 

20 b-&X1 1 1 1 :REM 15 binaire 

30 c$-"***" 

40 PRINT c$STR${a+b)-H3$ 

run 

*** 270*** 

FONCTION : Convertit sous forme de chalne alpbanumerique la representation decimale de 
r<expression numeriquo indiquee. 

Mots-cles associes : BINS, DECS, HEX$, VAL 

STRINGS 

STRINGS (<Jongueun>,<caractere>) 

PRINTSTRING$(40"*") 

FONCTION : Fournit une chalne de caracteres de la longueur indiquee (entre et 255) constituee 
par la repetition d'un meme caractere. L'exemple ci-dessus peut egalement d'ecrire : 

PRINT STRINGS (40,42) 

**************************************** 

. . . ou le <caractere> 42 correspond & la valeur en code ASCII du caractere "*". Cette notation 
fequivautdonc a PRINT STRlNG$(40,CHR$(42)). 

Mots-cles associes : SPACES 

SWAP 

Voir WINDOW SWAP) 



jrtedesmotedds CftBj*re3Page179 



SYMBOL 

SYMBOL <numero de caractere>,<!istede:<]igne> 

10 MODE 1:SYMBOL AFTER 105 

20 rangeel-255:REM 1 1 1 1 11 1 1 en binaire 

30 rangee2-129:REM 10000001 en binaire 

40rangee3-180:REM10111101 en binaire 

50 rangee4-l53:REM 10011001 en binaire 

60 rangee5-l 53:REM 1 001 1 001 en binaire 

70 rangee6-189:REM 10111 101 en binaire 

80 rangee8=255:REM 1 1 1 1 1 1 1 1 en binaire 

100 PRINT'La ligne 1 1 redefinie la lettre 1(105). Tapez quelques T et regar- 

dez!" 

1 10 SYMBOL I05,rangee1 ,rangee2,rangee3,rangee4,rangee5,rangee6,ran- 

gee7,rangee8 
run 

COMMANDE : Red^finit la forme d'un caractere affiche a 1'ecran. Chacun des parametres prend 
une valeur entiere situee enlre et 255. 

Afin d'etre en mesure d'attribuer une place en memoire a un caractere redeTini, rordinateur doit 
avoir 6\£ prepare' par la commande : 

SYMBOL AFTER x 

. ..ou x est infeneur ou egalau numero du caractere i reddfinir. 

On entre ensuite la commande SYMBOL, suivie immediatement du numero de caractere x. 

On peut toujours faire apparalrre a 1'ecran le caractere correspondant a la valeur de x, meme s'il 
n'est pas accessible par 1'interrnediaire du clavier. On utilise pour cela la commande : 

PRINT CHR$(x) 

Apres SYMBOL x viennent tes huit parametres defimssant une a une les liuit lignes constltuant 
le caractere, en commencant par le haut Chacun des parametres prend une valeur comprise entre 
0et255. Cest la representation tanairedupaiarnetrequide'finitle motif delalignecorrespondante 
dans le nouveau caractere. 

Si, par exemple, on donne au premier parametre la valeur 1, la representation en binaire de la 
premiere rangee sera alors : 00000001. Le point correspondant au 1 apparaltra dans le caractere 
et sera de la couleur dfifinie dans le commande PEN. En revanche, les points correspondant aux 
seront afficn6s avec la couleur PAPER, c'est-a-dire qu'ils n'apparattront pas. On peut done 
constater que le caractere rede^ni dans notre exemple comportera un point dans le coin supeneur 
droit Si l'on attribue aux sept autres parametres les valeurs 3, 7, 15, 31, 63, 0, 0, on obtient la 
representation en binaire suivante : 
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parametre (rangee) 1 : 00000001 (1 en decimate) £- 

parametre (rangee) 2 : 0000001 1 (3 en decimate) 

parametre (rangee) 3 : 00000111 (7 en decimate) 

parametre (rangee) 4 : 00001 11 1 (15 en decimate) 

parametre (rangee) 5 : 0001 1 11 1 (31 en decimate) 

parametre (rangee) 6 : 001 1 1 1 1 1 (63 en decimate) 

parametre (rangee) 7 : 00000000 (0 en decimate) 

parametre (rangee) 8 : 00000000 (0 en decimate) 

Cette disposition des parametres transcrits en binaire permet de visuaiiser la forme do nouveau 
caractere. On pent affecter ces parametres au caractere numeto 255, par exemple, au moyen de 
lacommande: 

SYMBOL 255,1 ,3,7,15,31,63,0,0 

On remarque qu'il est inutile de faire figurer les deux derniers parametres dans lamesure oi> ils 
tont nuls. 

SYMBOL 255,1,3,7,1 5,31 ,63 

On peut eviter de convertir en notation decimate tes symbotes binaires constituant le "dessin" du 
caractere. n suffit pour cela d'introduire les parametres directement en binaire, sans oublier te 
ortfixe &X Dans noire cas : 

SYMBOL 255,&X000000001 .&X0000001 1 .&X000001 1 1 , 
&X00001 1 11.&X0001 11111 .&X001 11111 

Voici maintenaot la commande permettant de faire apparaltre le caractere : . . 

PRINT CHR$(255) 

9 tes parametres ci-dessus sont aflfectes a un des caractfcres du clavier, le caractere redefini 
^iptrattra cnaque fois qu'on actionnera la touche correspondante, de meme qu'a chaque 
commande PRINT le concemant Ce nouveau caractere sera accepts par le BASIC comme 
'Equivalent du caractere remplace. 

?ow plus d'informations concemant la redefinition de caracteres, voir la deuxieme partie du 
^apitre intitute "A vos beures de loisn-...". 

tfots-ctes associes : SYMBOL AFTER 
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SYMBOL AFTER 

SYMBOL AFTER <nombre entier> 

10CLS 

20 SYMBOL AFTER 115 

30 PRINT'La ligne 40 redeflnie la lettre s "; 

40 SYMBOL 1 1 5,0,56,64,64,48,8,8,1 12 

50PRINrens" 

60 PRINFon reviem a I'etat normal en taparrt:" 

70 PR INr SYMBOL AFTER 240 H 

run 

COMMANDE : Fixe la limite inf&ieure des numeros de caracteres reddfimssables (de a 255). 
La valeur par d6faut du nombre entier est de 240, auquel cas on dispose de 16 caracteres 
rectefinissables (entre 240 et 255). Lorsque le <nombre entier> a pour valeur 32, to us les 
caracteres situ6s eutre 32 et 255 sont red6finissables. La commande SYMBOL AFTER 256 
interdit done toute red6finition de caractere. 

La commande SYMBOL AFTER retablit la valeur par defaut de tous les caracteres prec6dem- 
ment red6finis. 

La commande SYMBOL AFTER ne peut PAS fonctionner si la valeur de HIMEM a 6t& 
precetlemment modifiee par une commande MEMORY ou par 1 'ouverture d'un flchier au mo yen 
de OPENIN ou OPENOUT. L'ordinateur affictae dans ce cas le message d'erreur "Improper 
argument", (a moins que l'dtat precedent ne soit SYMBOL AFTER 256). 

Pour plus de details concernant les caracteres redeTuiissables, consultez la deuxieme partie du 
chapitre intitule" "A vos heures de loisir..." 

Mots-cl£s associes : HIMEM, MEMORY, SYMBOL 



TAB 

(Voir PRINT TAB) 
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TAG 

TAG [#<n umero de canat>] 

10 INPUT "entrez votre nom";a$:CLS 

20 PRlNT"Quel va et vient M ;a$;" I!" 

30 TAG 

40 x-LEN(a$)*17.7-50+RN[>300:MOVE -x,y 

50 FOR 1-x TO 640 STEP RND-7+3 

60 MOVE f,y:PRINT" ";a$;:FRAME:NEXT 

70 FOR b«640 TO -X STEP -RND-7+3 

80 MOVE b,y:PRINT a$;" ";:FRAME:NEXT 

90 GOTO 40 

run 

COMMANDS : Battle texte specific" a la pogitiooducorseflrgraphiqBe.Ce«ecomm»n(lftpennet 
d'introduire du texte et des symboles dans uq graphique et de les deplacer pixel par pixel plutOt 
que caractere par caractere. Le numero de canal prend par dtfaut la valeur #0. 

L'extremite gauche de la chalue de caracteres se positionne sur le curseur graphique (Text At 
Graphics). Les caracteres de controle non visualised tels que le changement de ligne ou le retour 
chariot n'auront aucun effet a recran si 1'instruction PRINT est terminee par un point-virgule ; 
dans le cas contraire, ils apparaltront sous leur forme graphique. 

Si l'indicateur de canal est #0 (par detaut), BASIC annule la commande TAG lore du retour en 
mode direct 

Mots-cl6s associes : TAGOFF 



TAGOFF 

TAGOFF [#<n umero decanafc>] 

10 MODE 2:TAG:REM texte aux coordonnees graphiques 

20 annee-1984:FOR x-1 TO 640 STEM 60 

30 MOVE x,400:DRAWR 07-350 

40 annee-annee+1:PRINT annee;:NEXT 

50 TAGOFF:REM retour aux coordonnees texte 

60 LOCATE 28,25:PRINrchiffres annuels" 

70 GOTO 70 

run 

COMMANDE : Annule la commande TAG concemant le canal indiqu6 (#0 par deTaut). Le texte 
jc trouve done a nouveau dirige" sur la position du curseur de texte. 

Mots-cl£s associes : TAG 
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TROFF 
TRON 



TROFF 
TRON 

10TROFF:PRINT:PRINTTROFF 

20FORn-lTO8 

30 PRINT'Le programme tourne":N EXT 

40 IF f-1 THEN END 

50 TRON:PRINT:PRlNT TRON" 

60t-1:GOTO20 

run 
COMMANDS : FWmet de sirivre 1'execuuOa d'un programme par l'affichage de chaque aum^ro 
d7l£ne«ecutee. Cc numero est affichd entre crochets [ ]. Cette fonction s'obben au moyen de 

TRON est particuherement precieuse lorsque 1'on desire suivre Ugne par ligne le deroulement 
d'un programme arm de corriger vine erreur. 
Mots-cles associes : Aucun 

UNT 

UNT (<adresse>) 

PRINT UNT (&FF66) 
-154 

COMMANDE : Convertit rargument eo un nombre entier signe- (en representation : complement 
a 2) compris entre -32768 et 32767. 
Mots-cles associ6s : CINT, FIX, INT, SOUND 

UPPERS 

UPPERS {<chaTne alphanum6rique>) 

10 CLS:a$="mes petites, com me vous avez grandi i" 

20 PRINT UPPER$(a$) 

run 

FONCnON • Recopie la <cname alphanumeriquO indiquee en remplacant par des majuscules 
les caracteres alphabetiques (de A a Z) apparaissant en minuscules. Cette fonctioD s utilise ^en 
particulier pour le traitement d'entrees dans lesquelles se trouvent meiangees des majuscules et 
des minuscules. 
Mots-cles associes : LOWERS 
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USING ;n 

(Voir PRINT USING) 

VAL 

VAL (<chaTne de caracteres>) 

1 CLS:PRINT "Je connais mes tables !" ; , a 

20 PRINT:PRINT"pressez una touche (1-9)" 

30 a$«INKEY$:I F a$~"" THEN 30 

40 n-VAL(a$):IF rx1 OR n>9 THEN 30 

50 FOR x-1 TO 12 

60 PRINT n;"X";x>";n-x 

70 NEXTrGOTO 20 

PONCTION : Foumit la VALeur numerique du ou des premiers caracteres (y compris le signe 
oegattf et le point decimal) de la <chalne alphanumerique> indiquee. 

On obtient la valeur lorsque le premier caractere de la chalne n'est pas un chiffie. Si le signe 
'-" apparalt en premier caractere ou si celui-ci est un point decimal suivi d*un caractere non 
numdrique, le message d'erreur 'Type mismatch" (erreur de frappe) (13) s'affiche a l'ecraa 

Mots-cles associ^s : STR$ 

VPOS 

VPOS (#<numero de canal>) .ja . 

10 MODE 1 :BORDER 0:LOCATE 8,2 - i<- -*>*<— ***» ? «*?• 

20 PRINT'utllisez las touches flechees (haul/bas)" 

30 WINDOW 39,39, 1,25:CURSOR 1,1 

40 LOCATE 1,13 

50 IF INKEY (0)<>-1 THEN PRINT CHR$(11); 

60 IF INKEY(2)<>-1 THEN PRINT CHR$(10); 

70 LOCATE #1,3,24 

80 PRINT#1 "curseur texte "; 

90 PRINT#1 ."position verticale -" 

100 PRINT#1,VPOS(#0):GOTO50 

run 

- ONCTION : Indique sur l'axe Vertical, la POSition du curseurde texte, a partir du bord superieur 
jt la fenfttre de texte. L'indicateur de canal doit obligatoirement figurer ; il ne prend pas la valeur 
tO pardeTaut 

Mots-clds associ6s : POS, WINDOW 
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wait f--.au. 

WAIT<num6ro du port>,<masque>[,<inverslon>] 

WAIT &FF34,20,25 

COMMANDE : Provoque one adeote jmqo'a cc que 1c port d'entiee*-sortta i dfcign* *"***** 

une valeur comprise entre e* 255 ; de telle sorte qu'apres avoir opexe un XOR (OU exclusif) 

avec le <masque>, puis un A' ID (ET) avec le parametre d'<inversion>, on obuenne un resultat 

nan nul. 

Le BASIC attend jusqu'a ce que la condition soit verifiee. 

Cette commande est a utiliser avec precaution. 

Mots-cies associes : INP, OUT 

WEND 

WEND 
WEND 

COMMANDE : Indique la fin d'une section de programme executee a l'iatfrieur d'unel boucle 

WHILE. Le BASIC reconnatt automatiquement la commande WHILE a laquelle WEND est 

associee. 

Mots-cles associes : TIME, WHI LE 

WHILE ^ 

WHILE oppression logiqueo 

10 CLS :PRINT "chronometre de 10 secondes H .-t-TIME 

20 WHILE TIM E<t+3000 

30 SOUND 1,0,100,15 

40 WEND:SOUND 129,40,30,15 

run 

COMMANDE : Repete une section de programme tart qu'une condition donnee est verififeJLe 
mot-cie WHI LE indique le delwt de la section a executer tandis que r<expression logique> definit 
la condition a verifier. 
Mots-ctes associes : TIME, WEND 
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WIDTH 

WIDTH <nombre entiei> ■" u -^ > 

WIDTH 40 

COMMANDS : Indique le nombre de caracteres par ligne Ion d'une sortie sor imprimante. Le 
BASIC se charge done d 'envoy er automatiquemeQt les retours chariot et les sauts de ligne 
necessaires durant l'impression. 

En Tabsence d'une commande WIDTH, l'ordinateur adopte par d£feut la valeur 132. La 
commande WIDTH 255 supprime tous les retours chariot et sauts de ligne supplementaires, 
laissant a l'imprimante le soin de generer elle-meme ces caracteres. Cependant, les retours chariot 
et sauts de ligne normaux dus a rinstruction PRINT continuent a etre envoyds a moins que la 
commande PRINT ne soittenmnee par un point-virgule (";") ou une virguleC',"). 

Mots-cles associes : POS 

WINDOW 

WINDOW [#<numero de canal>,]<gauche>,<tf rolte^^au^.^as* 

10 MODE 0:BORDER 0:REM cibletv 

20 INK 0,0:INK 1 ,25:INK 2,23:INK 3,21 

30 INK 4,17:1NK 5,6:INK 6,2:INK 7,26 

40 PAPER 0:CLS 

50 PAPER 1:WINDOW 2,4,1 ,18:CLS 

60 PAPER 2-.WINDOW 5,7,1, 18:CLS 

70 PAPER 3:WINDOW8,10,1,18:CLS 

80 PAPER 4:WINDOW 1 1 ,1 3,1 ,18:CLS 

90 PAPER 5:WINDOW 1 4,1 6,1 ,1 8:CLS 

100 PAPER 8:WINDOW 17,1 9,1, 18:CLS ■' ■'*-"-■-*■■-'■ 

110 PAPER 7.-WINDOW 2,19,19,25:CLS 

120 GOTO 120 

iun 

COMMANDE : En mode texte, indique les dimensions d'un canal d'affichage a Tecran (on parle 
dins ce cas de fenfttre). On veillera ace que les valeurs des paramfetres <gauche>, <droite>, <haut> 
et <bas> correspondent Men aux coordonnees en vigueur dans le MODE ecran utilisd. 

\jt <num6ro de canal> prendra par dCfaut la valeur #0. 

?our plus de details concernant les fenetres, voir la deuxieme partie du chapitre intitule" "A vos 
i de loisir..." 



ftfets~ck<s associes : WINDOW SWAP 
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WINDOW SWAP -H 

WINDOW SWAP <numero de canal> 1 <num6ro de canafc> : ;# 

1 MODE 1 :INK 1 ,24:INK 2,9:INK 3,8 

20 WINDOW 2 1,40,1 3,25:PAPER 3 

30 WINDOW #1 ,1,20,1 ,12:PAPER#1,2 -i*^.- ■ . : - -tW. 

40 CLS:PRINT #1 ."Fenetre N0 M 

50 CLS #1 : PRINT #1 ," Fenetre N 1 H 

80 LOCATE 1,6 

70 PRINT" Fenetre Rouge (0)";SPC{2) 

80 LOCATE #1,1 ,6 

90 PRINT #1," Fenetre Verte (1)" 

100 FOR t-1 TO 1000:NEXT 

110 WINDOW SWAP 0,1 :GOTO 60 

run 

COMMANDS : Intervertit la premiere fenttre et la seconde. 

Les deux <numeros de canal> doivent obligatoirement figurer sans etre precedes, dans ce cas 

precis, de l'indicateur de canal #. 

Cette commande permet de diriger les messages BASIC sur un autre canal que celui par detaut 
#0. 

Pour plus de details concemant les fenfttres, voir la deuxieme partie du chapitre intitule" "A vos 
beuresdeloisir... H . 

Mots-cles associds : WINDOW 

WRITE 

WRITE [#<nume>o de canab>,][<clonn0es a ecrire>] 

1 REM ecrit des donnees sur la disquette 

20 INPUT donnez-mol un nombre";a 

30 INPUT "donnez-mol une chatne de caracteres";a$ 

40OPENOUT"NOMFICH" 

50 WRITE #9,a,a$ 

60 CLOSEOUT:PRINT "Les donnees sort sauvees sur la dtequettes" run 

COMMANDE: Afficheou ecrit (WRITE) des donnees surlecanal indiqud. Deux articles distincts 
doivent etre separes par une virgule et les chatnes de caracteres sont placees entre guillemets. 

Dans notre exemple, les donnees entrees seront ecrites sur le canal #9, c'est- a-dire enregistrees 
sur disquette. 



Page 190 Chapitre 3 U8te<tes mete cles 



Poor retrouver les donnees, on utfliserale programme ci-dessous: 

10 REM retrouve les donnees sur la dlsquette 
20 OPEN IN "NOMFICH":INPUT#9,a,a$ 
30 CLOSEIN:PRINT'les 2 donnees sort:" 
40PRINT:PRINTa,a$ 
run 

Mote-clds assodes : INPUT, LINE INPUT 



XOR 

<argument> XOR <argument> 

IF "atein" < "bemard" XOR "chien* > -char THEN PRINT *vrar ELSE PRINT 

"faux" 

faux 

IF "bemard" < "alaln" XOR "chaf > "chien" THEN PRINT "vrai" ELSE PRINT 

"faux" faux 

IF "alain" < "bemard" XOR "chat* > "chien" THEN PRINT "vrai" ELSE PRINT 

"faux" vrai 

PRINT 1 XOR 1 

TV"'- , •■■ 

PRINT XOR 



PRINT 1 XOR 

1 



OPERATEUR : Bfftctoe bit ft bit Topdration booleenne XOR (OU exclusif) sur des entiers. 
Lorsque les bits des deux arguments ne sont pas ideutiques, le bit i£sultant vaut 1. 

Pour plus de d6tails conceroant les opeiateurs logiques, voir la deuxieme parte du chapitre intitule* 
"A vos taeures de loisir...". 

Mots-cles associ6s : AND, OR, NOT 



XPOS 

XPOS 

10 MODE 1:DRAW 320,200 

20 PRINTPOSto'on X du curseur graphique-"; 

30 PRINT XPOS 

run 
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FONCnON : Indique, sur 1'axe horizontal (X), la POSition du curseur graphique. 
Mots-cles associes : MOVE, MOVER, ORIGIN, YPOS 

YPOS 

YPOS 

10 MODE 1:DRAW 320,200 

20 PRINT'POSrtJon Y du curseur graphlque-"; 

30 PRINT YPOS 

run ..,_,■ 

FONCnON : Indiqoc, sur l'axe vertical (Y), la POSition du curseur graphlque. 

Mots-cl6s associfs : MOVE, MOVER, ORIGIN, XPOS 

ZONE 

ZONE <nombre entier> 

10CLS:FORz-2TO20 

20 ZONE z 

30 PRINT "X'V'X ZONE -";z:NEXT 

run 

COMMANDE : Modifie la largeur de la tabulation designee par la virgule dans la commande 
PRINT. La largeur des zones d'affichage ou d' impression, (de 13 caracteres pard6faut), peut ainsi 
prendre une valeur entiere quelconque entre 1 et 255. 

Mots-cl6s associes : PRINT i 
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Chapitre 4 : Utilisation des disquettes 
(6128 uniquement) 

Partiel : Disquettes 

Preparation des disquettes de travail 

Ce chapitre traite de la f agon de gerer vos disquettes pour un 
usage quotidien et presente quelques-uns des utilitaires 
CP/M. 

Sujets aborctes : 

<t Duplication des disquettes systeme 

it Introduction au CP/M Plus 

it Fonctionnement du systeme avec une ou plusieurs unites 

it Copie de fichiers avec PIP 

it Utilisation d'une disquette pour un travail en BASIC uniquement 

it Progiciel en BASIC AMSTRAD 

it Installation d'un progiciel CP/M PLus 



1 . 

'z 



partie 7 du Cours EMmentaire montrait comment fonnater une disquette vierge destinee a la 
rvegarde des programmes en BASIC des jeux, ou de CP/M. 

partie 10 du Cours Elementaire montrait comment faire des duplications fideles de disquettes 
ate du programme DISCKIT {face 1 de 1'une des disquettes systeme). 

cnapitre conceme la facon de preparer une disquette destinee a recevoir des programmes et 
i Militaries de votre cboix. 
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Duplication de la Disquette Systeme 

n est tits important de faire une copie de la disquette systeme foumie avec votre ordinateur etde 
garder 1'origiDal en lieu sur. n vous en coAterait beaucoup pour la remplacer ! 

Rappelez-vous que cbacune des disquettes foumies avec le 6128 Plus possede deux faces. Vous 
avez done deux faces au total. 

La face 1 est la plus importante car elle contient la copie du systeme d'exploitation CP/M Plus et 
un ensemble d'utilitaires servant au traitement des disquettes. La face 2 comprend des fichiers 
destines aux programmeurs-assembleurs. 

Vous devez conserver ces copies sous forme de "bibliotheque" de programmes. Vous selection- 
nerez le programme qui vous interesse en prenant une des disquettes de cette, bibliotheque plut6t 
qu'en effectuant une copie du dit programme sur une disquette vierge pour le lancer ensuite. 

Nous insistons bien sur le fait que les disquettes que vous utiliserez DOIVENT ETRE DES 
COPIES effectu6es a partir des disquettes systeme foumies avec 1' ordinateur. 

Si vous prenez une disquette vierge pour y faire une copie, le programme DISC-KIT (face 1) la 
formatera avant d'executer la copie. 

Introduction au CP/M Plus 

Le BASIC AMSTRAD entre en jeu des la mise sons tension de votre ordinateur. n se charge des 

operations jusqu' a ce que vous lanciez un programme BINaire a partir de l'AMSDOS ou que vous 
cbargiez le CP/M Plus a Taide de la commande CPM. 

Apres chargement de CP/MPlus, le 6128 n'a plus besoin de la face 1 de la disquette systeme, a 
moins, bien sflr, que vous ne desiriez exploiter Fun des utilitaires stockes sur cette face de la 
disquette. Seule la disquette d'amorcage du systeme doit etre une disquette systeme ; par la suite, 
vous pouvez inseier des disquettes de donnees a plus grande capacite de stockage. 

Pour lancer un programme, il suffit d'inserer la disquette contenant le programme et de taper son 
nonx Les donn6es utilisees par le programme peuveDt se trou ver sur la meme disquette que celui-ci, 
ou sur une autre. CP/M Plus autorise la permutation des disquettes tout comme l'AMSDOS. Si 
plusieurs programmes et quelques utilitaires doivent se trouver sur la meme disquette pour des 
raisonsdecommodite's.utilisezle programme PIP sur la face 1 d'une des disquettes systeme (voir 
plus loin, dans ce chapitre, et en cnapitre 5). 

Creation de profils 

L'une des disquettes systemes fournit un ficaier special appele PROF1LE.SUB contenant une 
liste de commandes executees automatiquement des le lancement de CP/MPlus. Vous pouvez 
alors (si ce n'est deja fait) inserer une copie de la face 1 des disquettes systeme et taper a la suite 
du message A : 

REN PROFILE. SUB-PROFILE. ENG 

. . . Vous creez ainsi le fichier PROFILE.SUB a partir de PROF1LE-ENG. Ce profil qui sera 
execute au prochain lancement de CP/M Plus, contient les commandes : 
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SETKEYS.CCP LANGUAGE 3 

... EUes permettent d'adapter les touches du clavier a la frappe des commandes CP/M et de 
convertir certains caracteres (pour l'obtention du signe "£" par exemple, en tapant [SHIT] 3. 

Apres utilisation de la commande SETKEYS.CCP, les lignes de coramandes CP/M sont editees 
au clavier de la meme fa?on qu 'en BASIC. Pour plus de derails, consultez la partie 2 du chapitie 5. 

Une ou deux unites ? 

Au premier chargement de CP/MPlus, le systeme detecte le nombre d'unite's de disquettes reliees 
a 1'ordinateur et 1'affiche a la suite du message d'identification. Ce precede risque d'etre fausse" 
si la disquette de la seconde unite n'est pas entierement ins6ree. 

Tous les messages d'erreur sont affiehes sous forme de banniere a la vingt- cinquieme ligne de 
recran, les 24 premieres etant utilisees par les programmes. 

Meme si voire systeme ne possede qu'une unite", le message "DRIVE is A:" ou "Drive is B" sera 
affiche sur la demiere ligne de recran : en effet, CP/MPlus vous permet de travailler avec une 
seule unite physique comme si vous en poss6diez deux. Vous pourrez alors alterner entre deux 
disquettes, et la banniere de message vous indiquera quand insurer la bonne disquette, suivant les 
besoins. Cette facon de proceder vous 6vite l'achat d'une seconde unite" mais elle exige une 
permutation frequente des disquettes, elle se revele done fastidieuse et g6n6ratrice d'erreurs. 

Copie de flchiers d'une disquette sur une autre 

Pour copier des fiebiers d'une disquette sur une autre, vous disposez d'un utilitaire standard PIP 
(Peripheral Interchange Program/Programme d'inter- connexion aux Peripheriques). 

Chargez le PIP a partir de la face 1 et tapez a la suite de A: 

PIP 

. . . Un nouveau message * vous indique le chargement correct du PIP Normalement, vous copiez 
des fiebiers d'une disquette source (unite" A) sur une disquette cible (unite B). Nous avons vu que 
dans un systeme a une seule unite le precede" est le meme. 

Pour copier un fichier, par exemple SUBM1T.COM, tapez a la suite du message * : 

B:-A:SUBM!T.COM 

Pour corner la totalite des fiebiers d'une disquette source sur une disquette cible, la commande 
sera : 

B:-V 

Pour sortir du programme PIP, appuyez sur [RETURN] a 1'apparition du message *. 

PIP est un programme tres perfectionne, sont fonctionnement sera approfondi au chapitie 5. 
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Une disquette r6serv6e au BASIC 

Comme nous l'avons d£ja vu, les diskettes systeme ne scrvent qu'a raraoicage du systfeme 
CP/MPlus. Les diskettes destindes au BASIC peuvent done ne contenir que des donnees et offrir 
une capacite de stockage tegerement supeneurc. 

La disquette doit etre formatee a l'aide du programme D1SCKIT. Pour copier des P™f™mes 
surcetie disquette, vous devez utiliser PIP (charge a partir de la face 1) ou LOAD sum de SAVE 
sous BASIC. 

Proglclel en BASIC AMSTRAD 

Si vous acbetez un programme ^application ecrit en BASIC AMSTRAD pour le 6128, son 
execution commencera des la mise sous-tension. D ne vous reste qu'alerecopier sur une disquette 
detravaiL 

Proglclel sous CP/M 

Le systeme d'exploitation CP/M vous donne acces a une immense librairie de logiciels, ecrits pour 

des micro-ordinateurs travaillant sous CP/M. La logique fondamentale de ces programmes etant 

deja definie, la seule chose qui vous reste a faire est de les transf£rer sur une disquette correcte de 

votre 6128 et de les informer sur sa maniere particuliere de gerer l'ecran. 

Un ensemble de programmes sur une disquette ayant pour objet une application specifique est 

appele un 'progiciel". Ces progiciels sont habitueUement congus pour etre utilises sur un bon 

nombre d'ordinateurs differents, ayant chacun leur taille d'ecran particuliere et leur propre 

systeme de deplacement de curseur. 

Le 6128 dispose d'un ^mulateur de temrinaux 1 ' integre pour l'exploitation des programmes 

CP/MPlus, dont les caraetenstiques different des codes de contrOIe g6rts par le BASIC. 

Le progiciel pourra avoir ete d6fini pour le systeme AMSTRAD ou pour son adaptation au 1 6128. 

Le cas ecbeant, suivez les instructions fouraies avec le logiciel pour un protocole Zemth Z19/Z29. 

S'il n'a pas && prevu de variante pour le systeme AMSTRAD, le paragraphe "Configuration d'un 

programme CP/M' ', un peu plus loin, vous indiquerades commandes de gestion d'ecran permettant 

d'adapter le progiciel au 6128 Plus. Cette procedure s'effectue normalement en entrant au clavier 

des codes specifiques. Encore une fois, suivez les instrue- tions foumies avec le progiciel. 

La disquette contenant le logiciel que vous avez achete doit etre utilisable par le systeme. La 

majorite des ordinateurs utilisant leur propre format, l'identite de taille des disquettes ne signifie 

pas qu 'elles soient compatibles. Demandez a votre fournisseur la version 3 pouces d' AMSTRAD. 
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Creation d'un proglclel sous CP/M sur disquette 

n est souvent utile d'avoir sur une disquette de progiciel, avec le programme d'application, les 
utUitaires SETKEYS.COM et SUBMIT.COM (ainsi que leurs fichiers d' instructions). 

PIP peut servir a transferer les fichiers .COM et a creer le fichier d'instructioas pour SUBMIT. 
PIP, dans ce dernier cas, se rfvfele etre eu effet un editeur ligne a ligne efficace. Par exemple, le 
fichier PROFILE.ENQ sur la face 1 aurait pu etre cr6e avec ces commandes : 

(inserez la disquette systeme dans I'unM A, face 1 vers le haut) Tapez : 

PIP 

(retirez la disquette et inserez la disquette cible), tapez : 

PROFILE.ENG-CON: 
SETKEYS KEYS.CCP 
[CONTROL] J LANGUAGE 3 
[CONTROL] Z 

La configuration d'un programme CP/M 

Le 6128 possede une gamme etendue de codes de reference pour r adaptation de progiciels sous 
CP/M. La plupart de ces progiciels ont besoin d'afficher et de lire des messages n'importe ou sur 
1'ecran ainsi que de eomprendre des commandes de gestion du curseur. 
Si votre logiciel a deja 6te adapte pour le systeme AMSTRAD, ce qui suit ne vous conceme pas. 

Adaptation de votre logiciel : les sorties (Output) 

La procedure de mise en service d'un progiciel consiste a executer un programme special (souvent 
^jpele INSTAL) qui vous pose un certain nombre de questions concemant les parametres de 
rtoan du 6128 s'il ne gere pas un terminal de type Z19/Z29 ou le 6128 en particulier. 
Inspirez-vous des reponses du tableau ci-dessous (extrait de la partie 15 du chapitre 6). 



■.ttr* 
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Codes de 

contrdie 


Hexa 


Decimal 


Operation effective 


[BEL] 


&07 


7 


Cloche 


[BS] 


&08 


8 


Deplacement curseur-gauche 


fLF] 


&0A 


10 


Deplacement curseur-bas 


[CR] 


&0D 


13 


Retour chariot 


[ESC] A 


&1B &41 


27 65 


Deplacement curseur-haut 


[ESC]C 


&1B &43 


27 67 


Deplacement curseur-droite 


[ESC]E 


&1B &45 


27 69 


Rffacement ecran 


[ESC]H 


&1B&48 


27 72 


Retour curseur en haut a gauche 


[ESQ J 


&1B &4A 


27 74 


Effacement de l'ecran depuis le curseur 
(inclus) jusqu'a la fin 


[ESC]K 


&1B &4B 


27 75 


Effacement de l'ecran depuis le curseur 

(inclus) jusqu'au bord droit 


[ESC]L 


&1B&4C 


27 76 


Insertion de ligne 


[ESCJM 


&1B &4D 


27 77 


Suppression de ligne 


[ESC3N 


&1B &4E 


27 78 


Effacement du caractere sous le curseur 


[ESQY 


&1B&59 
<o <r> 


27 89 
<o<i> 


Deplacement curseur a une position deH- 
niede l'ecran. 
c - colonne + 32 
r-ligne + 32 


[ESCld 


&1B&64 


27100 


Effacement de l'ecran depuis le deTwt 
jusqu'au curseur (inclus) 


[ESC]o 


&1B&6F 


27111 


Effacement de l'ecran depuis le bord 
gauche jusqu'au curseur (inclus) 


[ESC]p 


&1B &70 


27 112 


Entree en video inverse 


[ESC]q 


&1B&71 


27113 


Sortie de video inverse 



Adaptation de progiclel : les entries (Input) 

Les programmes du progiciel doivent avoir la possibility d'interroger le clavier. A rexception des 
deplacements curseurs, la plupart des touches du clavier du 6128 ont des valeurs standard. Bien 
qu'il soit preferable de faire en sorte que le progiciel accepte les valeurs standard par deTaut, il est 
possible d'utiliser SETKEYS pour redfifinir les codes donnes par le clavier. 

Malheureusement, il n'y a pas d*uniformit£ d'un logiciel a l'autre, pour les touches d'activation 
des fonctions de controle par exemple. Les touches de caracteres, la barre d'espacement, les 
touches [TAB] et [RETURN] sont generalement les memes, mais pour I'espace arriere et bien 
d'autres fonctions les choses se compliquent En effet, comparez par exemple les codes de 
deplacement du curseur en d£but de ligne. 
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Pour le CP/M : [CONTROL] B 

. . . et pour un traitement de texte courant ce sera ICONTROUQ S 

Trois jeux dc codes clavier sont foumis eo standard. Chaque configuration peut s'obtenir a partir 
des fichiers stockes sur la face 1 d'une des disquettes systeme. 

SETKEYS KEYS.CCP 

Cette commande envoyee automatiquement par PROFILE.SUB ddfinira le clavier correspon- 
dant aux commandes CP/M 

D6marrage d'un progiclel CP/M pr§t k I'emplol 

Normalement, vous n 'avez qu'a entrer le nam du progiciel apres 1 'apparition du A > . Ainsi, pour 
lancer un programme de traitement de bulletins de paye appete SALAIRE.COM, tapez simple- 
ment: 

SALAIRE 

Si vous devez dfefinir une configuration, un flchier SUBmit pourra etre foumi 

D6marrage automatique des progicieis CP/M prtts i I'emploi 

Le systeme d'exploitation CP/M Plus peimet un demarrage automatique de n'importe quel 
programme chaque foisquel'on charge leCPPlus. Cette fonction est realisee par i'une des options 
PROFILE.SUB. 



Utilisation des disquettes Ctapftre4Pagel99 



Chapitre 5 

Les elements de I'AMSDOS et du CP/M 

Partie 1 : AMSDOS 



Sujets abordes : 

if Introduction a AMSDOS 

if Le catalogue de la disquette 

if Changement des disquettes 

if Noms et genres des fichiers AMSDOS 

if Les en-tetes des fichiers AMSDOS 

if Noms de fichiers avec deux unites 

if Les jokers 

& Un exemple de programme consume" de commande AMSDOS 

if Re"capitulatif des commandes d 'AMSDOS 

•fc Copie de fichiers 

if Guide de r6fe*rence de messages d'erreurs ■*■ 

Introduction 

AMSDOS est une extension du BASIC AMSTRAD de votre ordinateur, ajoutantdes commandes 
externes supplementaires et red6finissant eertaines instructions existantes. Les nouvelles 
commandes externes sont identifiees par le symbole (barre). 

AMSDOS pennet a l'utilisateur de changer librement de disquette (a condition toutefois qu'il n'y 
ait pas de fichiers ouverts en ecriture, auquel cas un message d'erreur apparatt). 
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Le catalogue de la dlsquette 

Cbaque disquette est divisee en 2 parties, une pour le catalogue et une pour les donnees. Le 
catalogue est la liste des noms de fichiers que contieiit la disquette, accompagnee d'un "plan" de 
leurpositionnementsur la disquette. AMSDOSetCP/Mpeuventcalculerlatailledechaquefichier 
apres consultation de cede position dans le catalogue. Le calcul de l'espace disponible se fait par 
Paddition des fichiers existants puis la soustraction du resultat de l'espace disponible du total. 

Chaque fois qu'un fichierest lu, il y a d'abord examen de sa position dans le catalogue, determinant 
son emplacement sur la disquette. Lorsqu'un nouveau fichier est cree\ un espace vacant lui est 
attribud. Une fois effaced cet espace est libeni Le catalogue comptabilise par unite" de IK (un 
kilo-octet) et peut contenir jusqu'a 64 positions differentes. Les longs fichiers sont dotes d'une 
position pour chaque groupe de 16K utilise, cette manoeuvre etant normalement transparente a 
Putilisateur. 

Changement de disquettes 

AMSDOS et CP/M Plus vous permettent de remplacer ou de retirer une disquette a tout moment, 
en dehors des temps d'acces et si aucun fichier n'est ouvert sur Punite concernee. 

Remplacer une disquette en cours d'ecriture risque d'endommager les donnees qu'elle contient 
Lorsque vous remplacez une disquette contenantdes fichiers ouverts, ceux-ci sont "abandonnes" 
des qu'AMSDOS detecte le remplacement et un message d'erreur s'affiche. Toutes les donnees 
a venir sont alors perdues et la demiere position dans le catalogue ne s'inscrit pas sur la disquette. 
AMSDOS ne detecte le remplacement qu 'en lisant le catalogue, c'est-a-dire tous les 16K du fichier 
(ou lors de toute ouverture ou fermeture d'un fichier). Vous risquez ainsi de perdre 16K de donnees 
lorsque vous remplacez une disquette contenant des fichiers ouverts. 

Noms et genres des fichiers AMSDOS 

n est d 'usage d'ajouter une extension aux noms des fichiers disques. Cette extension, simple 
convention indiquant le type de fichier, ne joue aucun role precis. Certains programmes n 'accep- 
tent toutefois un fichier suivi d'une extension particuliere. AMSDOS admet n'importe quel type 
de nom mais cherche de prtference les fichiers d'un certain type, sauf specification particuliere. 
(Voir "Les en-tetes des fichiers AMSDOS"). 
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Construction des noms de fichfers 

Lenom est constitugde deux parties separees par un point la premiere partiede 8 lettres maximum 
et la seconde de 3. Ainsi, "ROINTIME.DEW, "DISC. B AS" et "DISCKIT3.COM" sont des 
noms de fichiers corrects. 

La deuxieme partie represente l'indicateur de type. Les noms de fichiers et leurs indicateurs 
peuvent etre composes d'un melange de lettres et de nombres mais ne peuvent contenir ni espace 
blanc, ni signe de ponctuation. Les indicateurs les plus communs sont : 

.<espace> Typenonspe\^e\Peutetreunficmerdedonne^creeparl'm^ 

"<nomfich>" (nom du fichier) ou un programme BASIC sauvegarde' en utilisant 
une commande AMSDOS du style SAVE "<nomflch> H , A. 

.BAS Programme BASIC sauvegarde a l'aide de commande AMSDOS du style SAVE 
"<nomfich>",P ou SAVE "<noinflch>. BAS", A. 

.BIN Programme BASIC sauvegarde a 1'aide de commandes AMStJQS du style SAVE 
"<nomfich>", B (<parametres blnaires>). 

.6AK Ancienne version d'un fichier sauvegarde" lors de la configuration d'une nouvelle 
version par AMSDOS ou un utilitaire. L'utilisateur est ainsi a mfime de realiser 
rancienne version (BAcK-UP) si besoin est 

.COM C'est une commande. Tous les utilitaires du CP/M ont cette extension. 

.SUB Fichier d'instruction du programme SUBMIT sous CP/M. 

Les en-tetes des fichiers AMSDOS 

AMSDOS dote automatiquement chaque fichier d'un indicateur de type. Si les indicateurs (par 
deraut) ne vous satisfont pas, vous avez la possibility d'en specifier un a votre convenance. 
L'indicateur de type peut correspondre pour le systeme a une certaine en-tete. Les programmes 
BASIC AMSDOS, les programmes compiles et les fichiers binaires sont sau veganMs sur disquette 
avec une en-tete (la meme que sur une cassette) permettant a la commande AMSDOS : 

LOAD H <nomfich>" 

... de les reconnaltre et d'agir en consequence. Si LOAD ne trouve pas d'en-tfite, il considere 
avoir a faire en code ASCIL 
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i^ du charged d'l* fichier (^^ 

^nSS^Su cootenu de 7£** cherche d'abord ce fichier sous le type : 



inddpendamme 

.<espace> 

.. .puis, si die oe trouve rien : 

.BAS 

. . .et enfin : 



.BIN __ 

L'trtuisateiiraamsileloUird'abrfgersesaomsdeftehto 

letype. 

Un fichier de donnees sur disquette rempli apres «^^^^J^tpf^^\ 
n'aura pas d'en-tete, et sod cootenu, provenant des commaudes BASIC : WRITE PRINT , L^ 
scraconstitufi de codes ASCII. Ed ^absence d'iDdicateur, la commande OPENIN cherchera un 
fichier dece type. 

Noms de fichier avec deux unites 

Dans le cas d'un systeme a deux unites de disquettes, si par exemple un J^™^^ n J^ 
Xn^Vr orSrXur. les fichiers peuvent se trouver sur 1'une ou 1'autre desdeux unites 

vous disposez soft de | A, soit de |B, soit encore de |DRWE sum *^^%™g ™ 
Vous pouvez supplanter le choix de 1'unite par defaut en adjoignant un prefixe (A. ou B.) au norr. 



Ainsi: 



...et 



IB 

SAVE "PROG.BAS" 

|A 



IA 

SAVE "B:PROG.BAS" 



.. .sauvegardent le programme sur Tunite B. 

De meme vous pouvez supplanter l'affectation numero USER (les numeros d'utflisatioo permet- 
StteSpa^du rehire) par defaut eu spdcifiant un numero d'utmsateur, compns entre 
et 15, qui servira de prefixe au nom de fichier. Ainsi, les commandes : 

LOAD"15:PROG.BAS" 



et.. 

SAVE "15:PROG. BAS" 



n nM n* a »»r a * AMSDOSetCP/M 
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. . . chargent et sauvegantebt le pr o gramme sur la section de la disquette affectfe a rutilnafcur 

15, quel que soit le numero par deTaut (voir commande) |USER dans la suite du manuel. 

Enfin, il est possible de supplanter a la fois la valeur par deTaut de 1'utilisateur (USER) et celle 
de I'tmitd (DRIVE) (dans cet ordre) en les inijfiquant dans le prtfixe du nom de fichier, comme 
parexemple: 

RUN"15B:PROG.BAS" 

Les Jokers 

On a souvent besoin d'effectuerdes acces au disque (copie, effacement, etc.) sur plusieurs ficbiers 
a la fois. Lorsqu'un nom de fichier est specific - pour telle ou telle operation, le systeme recherche 
le nom donne* dans le catalogue. H est possible dans certains cas de demander a ce que roperation 
soit effecuiee sur plusieurs fichiers ayant des lettres communes, les autres lettres €tant alors 
remplac6ea par des ? (signifiant 'ne pas tenir compte de')- On peut abrtger une s6rie de ? en la 
remplagant par le symbole *. Ainsi, FRED.* est le raccord de FRED.??? et P.BAS celui de 
F???????.BAS. 

Dans cet esprit, *.* signifie 'n'importe quel fichier'. 

Exemples : 



Catalogue 


Convient a 


Convient a 


Convient a 




*.BAS 


FRED7.BAS 


F*.BAS 


BERTBAS 


BERT.BAS 


FRED1.BA5 


FREDI.BAS 


FRED1.BAS 


FRED1.BAS 


FRED2.BAS 


FRED2.BAS 


FRED2.BAS 


FRED2.BAS 


FRED3.BAS 


FRED3.BAK 


FRED3.BAK 






FRED3.BAS 


FRED3.BAS 


FRED3.BAS 




FINAL.BAS 


F1NAL.BAS 


FINAL.BAS 
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Exemples d'utlllsatlon de commandes (TAMSDOS dans un pro- 
gramme 

Pour vous aider a Men comprendrc les command** d'AMSDOS, nous vous consefllons de bien 
regarder ces exemples et meme de revenir sur certaines parties au moment oil nous nous y rfferons 
dans la suite du chapitre. NB FATTES PAS fonctionner ces programmes avec Toriginal de vos 
disquettes systeme CP/M. Utilisez une disquetle de travaU ou une copie sur lesquelks ils pourront 
ecrire en toute security. 

Sauvegarde de variables et recopie d f 6cran 

U programme ci-dessous inscrit des donnees sur la disquette; vous devez done inserer dans l'umte 
une disquette vierge ou une disquette de travail. Le programme dessine le drapeau anglais et 
recopie la totality de Fecran sur la disquette. 

1 dumpfile$-"ttegdump.sm" 

20MODE1:BORDER0 

30 DIM colour (2) 

40 FOR i-0 TO 2 

50 READ colour (0 : REM charge les No de couleurs, en <DATA> 

60 INK i, colour (i) 

70 NEXT 

80 ON ERROR GOTO 430 

90 OPENIN "param.dat" ' teste si le fichier extete 

1 00 CLOSE! N:on ERROR GOTO 

110 IF ermum-32 AND DERR-146 THEN CLS:GOTO 160 ' le fichier n'existe 

pas 

120 CURSOR 1:PRINT"Do you want to overwrite old file ? Y/N H : 

130 a$-INKEY$:ON INSTR f Y/N, UPPERS (a$) GOTO 130, 150, 140:GOTO 

130 

140 PRINT a$:PRINT "Program abandoned" :END 

150 PRINT a$:CURSOR0 

1 60 OPENOUT "param.daf 

170 WRITE #9,dumpflle$,1: REM sauvegarde le nom du fichier et son mode 

180 FOR i-0 TO 2 

190 WRITE #9,colour (i) : REM sauvegarde les couleurs 

200 NEXT i 

210CLOSEOUT - > v=- ,;^:v 

220 CLS 

230 gp-1:GRAPHICS PEN gp.-w-125 

240 x— 65:a-240:y-400:b— 150:GOSUB 400 

250 y-0:b-1 50:GOSUB 400 

260 x-575:a— 240:y-400:b— 1 50:GOSUB 400 

270 y-0:b-1 50:GOSUB 400 

280 qp-2:GRAPHlCS PEN gp:w-40 

290 a -240:x-40:y-400:b-1 50:GOSUB 400 

300 x -0:y-0:b-1 50:GOSUB 400 
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31 a -240»-640:y-0:t>-1 50:GOSUB 400 

320 x-600.7-400:b-1 50:GOSUB 400 * S : 

330 ORIGIN 0,0,256,380,0,400:01.0 1 

340 ORIGIN 0,0,0,640,1 50,250:C1_G 1 

350 ORIGIN 0,0,200 f 352,0,400:CLG 2 

360 ORIGIN 0,0,0,640,168,230:CLG 2 

370 SAVE dumpflle$,b,&COOO,&4000 

380 DATA 2,26,6 

300 END 

4?0 Sp X ' ^"T* a ' b:DRAW * w,0:DRAWR -a,-b 
4 1 MOVE x+a/2+w/2,y+b/2:R LL on 
420 RETURN yM 

430 ermum-ERR:RESUME NEXT 
run 

qui est capturfe par le programme P t iVr^„^ »AxfT P ' ASICsignaleuneerneur 

Sottas • h inr d i. conteTO 

de donna* pour la sauvSrdt wSsfif™ flC if r ' ^quiroustierufflfeaoond'unflcnto 
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Restitution d'6cran 

L'exemple suivantest le programme type dc restitution d'une copic d'ecran faisantappel an flcbier 
des parametres pour definir son action. Vous remarquercz la facon d'appeler (INPUT)les variables 
se trouvant dans un fichier avec variation automauque de longueur de fichier par la foocuon EOF 
(End Of File - Fin de fichier). n est important de sauvegarder les parametres de l'ecran, pour 
eliminer toot risque de brouillage des resultats. La commande MODE et le blocage du defilement 
continu de 1'image, accomplissent cette sauvegarde. 

1 DIM colour (1 5): REM provision for 1 8 colours 

20 OPENIN "param.dar 

30 INPUT #9,fHename$,screen mode 

40i-0 

50 WHILE NOT EOF 

60 INPUT #9, colour (I) 

70 INK Lcolour (i) 

80 i-l+1 

90 WEND 

100CLOSEIN 

1 1 MODE screen mode:BORDER 

120 LOAD filenames 

run 

Sommaire des commandes externes d'AMSDOS 
|A 

|A 
COMMANDE : Dirige les entrees/sorties vers l'nnite" A. Bqntvalem a (DttVE avec A pour 
parametre. (L'unite" principale est le drive A). 

IB 
IB 

COMMANDE : Dirige les entrees/sorties vers l'unite B. Equivalent a |DRIVE avec B pour 
parametre. (L'unit6 principale est le drive B). 

|CPM 

|CPM 

COMMANDE : Charge et initialise le systeme d'exploitation contenu dans la disquette systeme. 
Les systemes foumis avec l'ordinateur sont les CP/M 2.2 et CP/M Plus. 

Cette operation echoue si Tunite" ne contient pas de disquette systeme CP/M. 
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(DfR 

[DIR [,<chame alphaninneriquo] 

|DIR,"*.BAS" 

COMMANDE : Affiche Ie catalogue de la disquette (facon CP/M-) ct I'espace disponibte. 
L'absence de la chalne equivaut a *.*. 

(DRIVE 

(DRIVE, <chaine alphanumenquO 

JDRIVE, "A M 

COMMANDE : Designe Pumt6 par d6raot Cette commande ecboue si AMSDOS est incapable 
de lire la disquette dans l'unit6 designee. 

(ERA 

|ERA,<chatne alphanumenquO 

|ERA,"\BAK" *„.-„,»#-.-. 

COMMANDE : Effcce tous les fichiers qui correspondent a ce nom de fichier et ne sont pas en 
Ecriture settlement Les jokers sont pennis. 

(REN 

|REN,<chatne alphanumenquO, <chame alphanumenquO 

|REN, "NOUVEAU.BAS", "ANCIEN.BAS" 

COMMANDE : Donne un nouveau nom de fichier. H ne doit pas exister de fichier portant deja 
ce nom. Les jokers ne sont pas autorises. 

Le parametre USER (voir |USER) peut em? specific dans la <chatne alphanumeriquo pour 
supplanter toutes les valeurs par d€faut. Ainsi, la commande |REN,"0:NOU- 
VEAU.BASV15:ANCIEN.BAS" rebaptise le fichier de l'utilisateur 15, "ANCIEN.BAS", et 
l'appelle "NOUVEAU.BAS" en Taffectant a rutilisateur 0, sans tenir compte des valeurs par 
defaut ou de"finies prec&iemment 

(USER 

|USER.<Nornbre entier> 
|USER,3 

COMMANDE : Dftermtae sur laqodfc de* 16 sections <ra catalogue (comprise entre et 15) 
; s'effectuer les acces disque (ex : CAT, LOAD, pIR etc...) 
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Un fichier pent fttre transfix d'un nomero d'utilisateur & I'antre, a Tade d'un |REN. Ain- 
sqREN,"15:EXEMPLE.BASV0:EXEMPLE.BAS" transfere un fichier de rutiJisateur a 
I'utilisateur a l'utilisateur 15, sans modifier le nom du fichier (EXEMPLE.BAS). 

Cople de flchiers entre dlsquettes 

Fichiers AMSDOS a en-tete 

II est possible de copier ces fichiers sous OWM en onHsant PIP (voir oe ctapitre, partie 2). 
N'importe quel fichier cr6e sous AMSDOS comporte une zone d'en-tete (voir "Les en-tetes 
d'AMSDOS") et peut etre copie integralemeut, de disquette a disquette et de cassette a disquette 
- toutefois, son contenu est en general incomprenensible par CP/M 

Fichiers ASCII 

Les fichiers crees sous AMSDOS sans zone d'en-ttte soot g e neratement eaits en codes ASCII et 
sont compris par AMSDOS et CP/M. Ds peuvent done s'echanger librement entre AMSDOS et 
CP/M 

Fichiers en lecture sentement 

CP/M petmet de limiter Faeces a un fichier en lecture seulement, et/ou selon son etat dans le 
catalogue. De tels athibuts sont accordes et supprimes par CP/M tou t en 6 tant respectes par 
AMSDOS. Pour plus de details, voir la partie 2 de ce chapitre (utilitaire SET), 



-'f.x?y* 
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Guide des messages d'erreur AMSDOS 

Lorsque, pour une raison quelconque, AMSDOS ne peut executer une commande, il affiche un 
message d'erreur a I'ecrao. En cas de probleme materiel le message est suivi de la question : 

Retry, Ignore or Cancel ? 

R: UcornniandeestexecuteeaiKMiveraar^ 

I : rordinateur continue son travail comme si de rien n'etait amenant souvent des 
resultats inattendus et probablement errones. 

C : i'operation est annulee, ce qui entralne souvent un autre message d'erreur. 

Signification des messages 

Unknown command 

La commande n'a pas et6 ecrite correctement 

Bad command 
La commande ne peut etre execotfe. Erreur de syntaxe ou mauvaise conflgurationmalWelle. 

<nomflch> already exists 

L'utitisateur essaye de renommer un fichier avec un nom deja utilise sur la disquette. 

<nomfich> not found 

Lefidnern'existepas. 

DRIVE <unltt> : directory full 

de place dans le catalogue pour une nouveUe entire. 

DRIVE <untte> : disc full 

de place sur la disquette. 

DRIVE <unfte> : disc changed, closing <nomflch> 
i dbq nctte a 6te entevte. avec des fichiers laisses ouverta. 

<3wnflch> Is ready only 
^c fetter est timite en lecture et ne peut ttre tntite. Cet atmTwt eat accord ou sur^jrimt sous 
-?Otf Mtiquemeat 
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DRIVE <unite> : disc missing 

Disquette absente du lecteur, ou mal mise en place (ne toumant done pas). D est alors recommandg 
de rejecter et de la remettre a nouveau, puis de taper R. 

DRIVE <unrte> : disc is write protected 

On a essayd d'ecrire sur une disquette dont le trou de protection en ecriture est ouvert La sortir, 
obturer le trou de protection, la rernseter et taper R. 

DRIVE <unfte>: read fail 

Probleme materiel, n est recommandd d'ejeoer la disquette puis de la remettre en place. Taper R. 

DRIVE <unlt©>: write fall 

Comme prec6demment 

Failed to load CP/M 

Erreur de lecture au chargement du CP/M (|CPM) ou disquette systeme invalide. Ou Men votre 
disquette ne content pas de CP/M. Si vous tentez de charger le CP/M a partir d'une disquette de 
donnees, vous obtenez le message "read fail". 



3J 



,**r? s r»*; ffjl&i 



;«M 



aafc 
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Partle 2 : CP/M 
CP/M Plus 

Sujets abordes : 

ft Introduction au CP/M Plus 

ft Chargement du CP/M Plus 

ft Le Mode Direct 

ft Les programmes transitoues 

ft Gestion des p6riph6riques 

Le CP/M Plus est fourni avec le 6128. C'est un systeme d'exploitation de disquettes qui vous 
permettra d'utiliser toute la puissance de votre ordinateur. Ses 128 Ko de memoire RAM sont 
pleinement exploits, laissantplus de 61 ko a rutilisateurpour ses programmes. CP/M integre un 
acces seiectif aux fichiers de doonees et le CP/M 6128 apporte les avantages d'un emulateur de 
tenninaux (postes VDU) perfectionne. Implantd sur de nombreux ordinateurs, CP/M a suscite le 
ddveloppement de milliers de logiciels d'application et accumoie une experience et des connais- 
sances enormes, sur lesquelles vous pouvez vous appuyer. 

Introduction 

Le systeme d'exploitation CP/M sert d'interface avec le mecanisme de l'unite, vous permettant 
de communiquer avec l'ordinateur etde manipuler ses fichiers et penphenques. 

Des commandes speciales (et des programmes sur disquette appeles, utilitaires) vous aident a 
realiser votre principale tiche : l'exploitation de vos programmes d'applications avec vos propres 
doonees. 

n va sans dire que vous pouvez devenir expert en matiere d'utilisation du CP/M et de fonction- 
oement des differents utilitaires : cela vous sortira d'affaire plus d'une fois. Cependant, la plupart 
des utilisateurs peuvent se contenter de connaissances de base permettant de demarrer. La suite 
de ce cnapitre va leur permettre de decouvrir les fonctions du systeme et tous ses avantages, sans 
que 1'essentiel soit enseveli sous un exces de details. 

Le mode direct est 1'intermediaire principal a votre disposition. On l'identifie par la presence a 
l'ecran des indicateurs d'attente A> OU B>. Certaines commandes, dites residentes, sont acces- 
ribles directement, a 1 'inverse de la plupart des fonctions, obtenues en chargeant en memoire des 
programmes, dits transitoires, pour le temps de leur utilisation uniquement 
A cote des messages d'erreur standard du CP/M, le systeme genere ses propres messages. lis se 
dtatinguent des autres car ils apparaissent dans la banniere de recran. 
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CP/M Plus sur la disquette 

La plus grande partie du CP/M Plus reside dans un ficMer special de type "EMS" qui se trouve 
sur la face 1 d'une des disquettes systeme. Le chargement en memoire du CP/M a partir de ce 
fichier s'effectue en deux temps. 

Lacommande AMSDOS |CPM charge d'abord le premier secteurde la piste 0. Cesecteurde la 
disquette systeme contient un programme qui charge le fichier .EMS en memoire. Le reste des 
pistes systeme demeure inutilisfi. 

Creation de flchlers PROFILE 

Lots du chargement du CP/M Plus, les commandes du fichier PROF1LE.$UB (s'il se trouve sur 
la disquette) sont executees. Cette particularite" permet de redeTmir le clavier, personnaliser le 
mode d'affichage de recran, initialiser rimprimante et mfime effectuer le lancement automatique 
d'un programme d'appltcation. Nous avons vu au chapitre 4 comment renommer le fichier 
PROFILE residant sur la face 1 de la disquette systeme afin qu'il soit execute lors du chargement. 

Pendant l'execution du fichier PROFILE, un petit fichier provisoire estouvertsurladisquerlequi 
ne doit done pas avoir ete protege en ecriture. C'est pourquoi la disquette systeme ne peut pas 
contenir de fichier PROFILE executable. 

Les fichiers PROFILE peuvent s'obtenir a l'aide d'un traitement de texte, d'un ectiteur de texte 
(ED.COM, par exemple) ou mfime a partir du BASIC. Ainsi, le petit programme en BASIC 
ci-dessous pourrait g6nfirer le fichier PROFILE.SUB. 

10 OPENOUT "PROFILE.SUB" 
20 PRINT #9, "SETKEYS KEYS.CCP" 
30 PRINT #9, "LANGUAGE 3" 
40CLOSEOUT 
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Code de contrdle de la console 

L'univers CP/M, c'est aussi un ensemble de codes clavier speciaux pour contrdler le deroulement 
des programmes. Ces codes remplacent le [ESC] du BASIC et les touches de deplacement du 
curseur du BASIC AMSTRAD. Les codes de contrdle ci-dessous sont affected apres lancement 
decommande: 

Les codes decontrole ti-dessous sontaffectes apres lancement de la commande : 

SETKEYS KEYS.CCP 

Le programme transitoire SETKEYS.COM et le fichier de commande KEYS.CCP se trouvent sur 
la face 1 d'une des disquettes systeme. 



Code de contrOle Touche 

fCONTROL]A <- 



[CONTROLJB 


[CONTR0L]<- 

ou 

[CONTROL]-* 


[CONTROLJC 


[CONTROL][ESC] 


[CONTROLJE 


[CONTROL][RETURN] 


[CONTROLJF 


-» 


(C0NTR0LK3 


[CLR] 


(CONTROLJH 


PEL] 


(CONTROL]! 


[TAB] 


(CONTROL]! 




rCONTR0L]K 


[CONTROL][CLR] 


PCONTROLJM 


[RETURN] oq [ENTER] 


fCONTROLjP 





(COKTPOLjQ 



Action 

Deplace le curseur d*un caractere vers la 
gauche 

Deplace lecurseurjusqu'au debut de la ligne 
ou, s'il s'y trouve deja, en fin de ligne. 

Abandon 

Retour chariot physique 

Deplace le curseur d'un caractere vers la 
droite 

Efface le caractere sitne* sous le curseur 

Effacement du caractere precedant le cur- 
seur 

Deplace le curseur jusqu'a la tabulation sui- 

vante 

Validation de la ligne commande 

Efface les caracteres jusqu'a la fin de la ligne 

Validation de la ligne commande 

Basculement en mode copie d'ecran : toute 
sortie vers l'ecran sera automatiquement im- 
primee. 

Valide a nouveau la sortie des donnees vers 
l'ecran 



CONTROLJR [CONTROL][ENTER] Retape une ligne de commande 
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[CONTROL]S 

[CONTROLJU 
[CONTROLJW 

[CONTROLpC 
(CONTROLJZ 



[ESC1 

[COPY] 
[CONTROUPEL] 



Suspend momentairfment la sortie des don- 
nees vers l'ecran en provenance du CP/M. 
Voir[CONTROL]Q pour reprendre 

Sapprime une ligne 

RappeBe la ligne de commande la plus *6- 
cemmenttapee 

Efface le detnit de la ligne jusqu'an curseur 

Hndetexte 



Les noms de fichiers 

Beaucoup de commandes ont pour parametres des noma de ficniers (^tenant, tecasechiant, des 

jokers (voir le paragraphe jokers" dans to partie 1 du chapitre). Tous les noms de fichiers sont 

automatiquement mis en majuscules. 

Les commandes du mode direct ne requierent pas le placemertdeguillemetsder^etd'antredu 

nomdefichier. 

Rappelez-vousqueles noms de fichiers peovent etre precedes de A: ou B: pour demanderaCP/M 

d'utiliser une untie* particuliere. 

Voici la syntaxe d'une commande CP/M type : 
TYPE KEYS.CCP 

TYPE est la fonction requise : "affichage a Team", et KEYSXXTesttenomduffcliierqueron 
d6sire voir apparattre. 



_^. >,»> ■*»*■? **\<-V{ 
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L'algul Mage des unites 

II est possible d'aiguiller le systeme de selection des unites vers A on B en tapant A: ou B: apres 
fe symbole B> ou A> (qui indique l'unitd en cours) .L'ajout du prtfixe A: ou B: au nom de ficher 
ecrase la valeur de P unite par d6faut mais ne la redlfinit pas. 

Les commandes du mode direct 

Ces commandes peuvent etre tapees a rapparition des symboles A> ou B>. Elles peuvent Stre 
abregees. Les fonctions ci-dessous sontintegrees, mais il existeplusieurs commandes transitoires. 
plus complexes, portant le meme nom. 

La commande DIR 

DIR affiche le catalogue de la disquette. Les fichiers apparaissent selon leur ordre d'entree sur le 
repertoire de la disquette. Les jokers soot peimis. Les fichiers portant Pattribut "SYS" ne seront 
paslistes. 

DI R donne la liste de tous les fichiers de 1 'unite par dtfaut 

DIR B: donne la Kste de tous les fichiers de Punite* B 

DIR *.B AS donne la liste des fichiers de type .B AS * 

DIR B:\BAS donne la liste des fichiers de type .BAS de Pumte B 

DIR P1P.COM seul PI P.COM apparatt sur la liste (s'il existe) 

La commande DIRS ou DIRSYS 

DIRSYS ou DI RS, ne liste que les fichiers du catalogue possMant 'SYS" comme attributAcette 
particularite pres, cette commande fonctionne comme la commande DIR. L'attribut SYS estdecrit 
plus loin. 

La commande ERA ou ERASE 

ERA vientdeFanglaisERAsequiveut dire effacer. Elteserto^oiiciefiacerunouiihisieursrlcbiers 
du catalogue. En fait, la position sur le repertoire est effacee, les donnees restant en place jusqu'a 
ce qu'un autre fichier ne les recouvre. Elles ne peuvent toutefois jamais etre recupetees. Bien que 
les jokers soient permis, la specification de *.* provoque l'affichage d'une demande de confirma- 
tion avant que ERA n'efface effectivement rensemble des fichiers. ERA ne mentionne pas le 
Mm des fichiers qu'elle efface. Si Pun des fichiers a effacer est de type *lecture/seulement% 
O'attribut 'lecture/seulement 1 ' estdecrit plus loin), la commande n'aboutit pas. 



BIAPIP.COM effeceratefichierPIP.COM 

ERA B:PIP.COM effacera le fichier PIP.COM de Punite B 

ERA \BAS effacera tous les fichiers de type .BAS 
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La commande REN ou RENAME 

La commande REN vous permet de changer le nom (RENommer) d'un fichier existaut. Le 
nouveau nom est specif^ en premier suivi du signe 6gal (=), puis du nom du fichier a renommer. 
Si le nouveau nom existe deja sur la disquette, un message d'erreur s'affiche. 
Les noms de fielders comportant des jokers ne rentrent pas dans le cadre de cette commande 
integree; il faut done faire appel au programme transitoire RENAME.COM. 

RENNOUVNOM.BAS=ANCNOM.BAS donne au fichier ANCNOM.BAS le nouveau nom 

NOUVNOM.BAS 

REN B:NOUVNOM.BAS=ANCNOM.BAS donne au fichier ANCNOM.BAS le nouveau nom 

NOUVNOM.BAS surB. 

La commande TYPE ou TYP 

La commande TYPE (imprimer) demande que le fichier specif!* defile a reenm. Si ce fichier 
n'est pas de type ASCII, des choses imprevisibles risquent d'apparaitre a l'ecran. 

TYPEKEYS.CCP 

.. .affiche le fichier KEYS.CCP. 

La commande USER, ou USE 

USER change le numero d'utilisateur couranL CP/MPlus s'initialise avec le nomero d'utilisateur 
courant O. Vous ne pouvez acceder qu'aux fichiers identifies par le numero d'utilisateur courant, 
ce qui permet de partager le catalogue. 

n est possible d'acceder a un fichier de 1'utilisateur ayant l< SYS" comme attribut a partir de tous 
les autres numeros d'utilisateur. Cette puissante fonction permet de rendre les utilitaires et les 
programmes d'applications accessibles a tous les utilisateurs sans avoir a les copier dans chaque 
zone utilisateur. 

USER 3 

dfifinit 1'utilisateur courant numero 3. 
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Les commandes transltolres 

Pour reaiiser sur vos fichiers des operations tin peu plus sophistiquees qu'avec le mode direct, 
vous pouvez fairc appel a l'un des nombreux programmes utilitaires foumis avec le CP/M. Vous 
les appelez simplement en tapant leur nom, suivi parfois d'un nom de fichier et/ou d'un ou 
plusieurs parametres. Vous avez deja probableraent utilise D1SCKIT. 

Nous avons regroupd ces commandes par categories comme indique' ci-dessous : 

Les commandes DISCKIT, SETKEYS, SETLST, SETSIO, PALETTE, LANGUAGE et 
AMSDOS, ainsi que les programmes de gestion d'ecran GSX et l'installation de LOG03, propres 
a AMSTRAD, ne fonctionnent que sur son systeme et ne peuvent etre employees sur les autrcs 
systemesCP/M. 

Vous pouvez entrer plusieurs commandes sur une meme ligne en separant les commandes par un 
point d'exclamation. Exemple : 

LANGUAGE 3! SETKEYS KEYS.WP 

La gestion des p6riph6riques 

DISCKIT formate, copie et verifie les disquettes. H est plus rapide de formater pendant la copie 
que d'effectuer les deux operations Tune aprfcs l'autre. Des menus vous indiquent les touches a 
activer (essentiellement des touches de fonction). Les disquettes cornmercialisees sont similaires 
aux disquettes systeme, sinon qu'elles sont adaptees a la distribution de logiciels; toutefois, les 
disquettes formatees pour le stockage des donnees sont peut-etre plus adequates pour travailler 
sous CP/M Plus. 

AVERTOSEMENT 

Le brevet de votre disquette CP/M (qui possede im immero de s^rie cod6 eTectroniquement) vous 
permet de l'utiliser sur un seul micro-ordinateur. Ceci signifie en particulier qu 'il vous est interdit 
de faire don d'une copie de votre CP/M (copie qui possdderait alors votre numero de serie). Etant 
donne" que chacune des copies de la face 1 des disquettes systeme contient votre CP/M (dans le 
fichier .EMS), il vous est interdit de vendre ou ecbanger toute disquette contenant ce fichier ou 
de vous en separer de quelque facon que ce soit 
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Jeux de caracteres 

Le 6128 possede an jeu complet de caracteres internationaux. La commande LANGUAGE 
modifie certains caracteres pour permettre a des logiciels peu perfectionn6s d'afficher a l'ecran 
d'autres caracteres et des lettres accentuees. Pour plus de details, consultez la partiel6duchapitre 
"Pour information". 

La commande : 

LANGUAGE 3 

permet d'installer le jeu de caracteres britannique, remplacant le signe # par £ (le Jen americain 

estlejeuparddfaut). 

Les couleurs 

Sous CP/M Plus, les couleurs par deTaut du 6128 (avec moniteur couleur) affichent des caracteres 
en blanc brillant snr fond bleu. Vous pouvez les modifier par la commande PALETTE, qui 
possede plusieurs parametres, un pour chaque encre : rencre inclut le fond et la bordure de 
l'ecran et 1'encre 1 de"finit la couleur du texte. Chaque couleur est codec par un nombre compris 
entre et 63. Sur un moniteur monochrome, ce numero dCfinit l'intensite" d'afficnage. 

Vous pouvez specifier n'importe quel nume'ro d'encre compris entre 1 et 16, mais seules les deux 
premieres encres sont visibles en mode 80 colonnes. 

La commande: 

PALETTE 63,1 

inverse les specifications normales des encres et 1, cbangeant le fond en blanc brillant (63) et le 
texte en bleu (1). 

Pour selectionner les couleurs (ou leurs intensites), aktez-vous du tableau de la page suivante. 
Vous pouvez au choix utiliser la representation decimate ou hexadecimale. 
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Couteur 


Code 


Code 


Couteur 


Code 


Code de- 




Hexa 


decimal 




hexa 


cimal 


Noir 


&00 





Bleu pastel 


&2B 


43 


Bleu 


&02 


2 


Orange 


&2C 


44 


Bleu vif 


&03 


3 


Rose 


&2E 


46 


Rouge 


&08 


8 


Magenta pastel 


&2F 


47 


Magenta ( 


&0A 


10 


Vert vif 


&30 


48 


Mauve 


&0B 


11 


Vertmarin 


&32 


50 


Rouge vif 


&0C 


12 


Turquoise vif 


&33 


51 


Violet 


&0E 


14 


Vert citron 


&38 


56 


Magenta vif 


&0F 


15 


Vert pastel 


&3A 


58 


Vert 


&20 


32 


Turquoise pastel 


&3B 


59 


Turquoise 


&22 


34 


Jaune vif 


&3C 


60 


Bleu ciel 


&23 


35 


Jaune pastel 


&3E 


62 


Jaune 


&28 


40 


Blanc brillant 


&3F 


63 


Blanc 


&2A 


42 









Le clavier 

Vous pouvez modifier les codes g&teres par le clavier a l'aide de la commande SETKEYS. Ceci 
permet d'affecter les codes adequats aux touches physiques ou logiques. Les codes doivent 6tre 
inscrits dans un fichier dont le nom est ensuite passe' en parametre dans la commande SETKEYS. 
Ce fichier de commande pent etre creC par un 6diteur de texte, PIP, ou mfime a partir du BASIC. 
Par exemple : 

SETKEYS KEYS.TST 

oo le fichier KEYS.TST contient : 

B &8C "DIRTM" touche logique 12 

8 N S C H TH" espace arriere-[CONTROLjH,08 ASCII 

Ced modifie la touche logique [CONTROL] [ENTER] (code &8Q, qui devient DIR [RE- 
TURN], et transforme la touche de retour arriere du curseur (touche numerique 8) en espace 
tcriere. 

Les fichiers standard du 6128 sont KEYS.CCP pour les commandes CP/M et KEYS.WP qui 
ooovient a de nombreux traitements de texte. 
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Les imprimantes 

Les imprimantes peuvent etre initialisees par la commande : 

SETLST<nomfich> 

le <nomfich> contient la ou les cbatnes a eovoyer a rimprimante. Comme avec le fichier de 
commande pour SETKEYS, les codes de controle peuvent etre represent6s par : 

T<caractere> 

ou 

T ^valeurducaractero' 

ou bien 

T'<nom du code de contrdle>' 

Les noms des codes de controle sont ESC.FF, etc., comme l'indique le tableau des caracteres 
ASCII du chapitre 'Pour information". 

Pour de uombreuses imprimantes, la valeur 15 repnSsente un code d'initialisation utile, ddfinissant 
une impression condensee. 

La commande: 

PRINT#8,CHR$(15) 
serait la syntaxe en BASIC. Sous CP/M, elle devient : 

SETLST CONDENSE 

Le fichier CONDENSE contient Tune des lignes ci-dessous : 

T'SI' 
TO 

T'&F' 
T'15' 

qui representent toutes la valeur decimate 15. 

Pour certains programmes d'application, l'ecran doit etre de 24 lignes x 80 colonnes. La 
commande SET24X80 permet d'obtenir ce format d*ecran. 
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Poor activer le mode 24x80, utilises lea commando : 

SET24X80 
ou 

SET24X80ON 
Pour le desactiver , utilises la commande : 

SET24X80 OFF 

La taille d'ecran nonnale du 6128 est 24X80, la demiere ligne 6tant reservee aux messages d'6tat 
La desactivation du mode 24X80 n'est visible que si la ligne d'6tat est egalement invalidee. Pour 
la validatioo et rinvalidation de la ligne d'etat, reportez-vous a la partie 15 du cbapitre 6. 

Interface s^rie 

CP/M Plus permet de gerer une interface RS232 ne posseiiant qu'un seul canal. Pour visualiser 
ses principales caracteristiques, tapez la commande SETSIO (sans parametre) : 

SETSIO 
ou une commaade comprenant l'une (voire la totality) de ces selections : 

SETSIO, RX 1200, TX 75, PARITY NONE, STOP 1 , BITS 8, HANDSHAKE 
ON, XOFF OFF 

pour une nouvelle configuration. 

Le debit de Pioterface et l'tet XON/XOFF peuvent egalement etre fixes par la commande 
DEVICE qui gere les peripheriques logiques et physiques. Les peripheriques logiques sont 
indiques par un deux points (: ). Pour visualiser tous les attributs de peripheriques installs, tapez : 

DEVICE 

Ces attributs peuvent toe modifies par les commandes : 

DEVICE SIO [1200] fixe le debit a 1200 bauds 
DEVICE SIOIXON] active le protocole XON/XOFF. 
DEVICE SIO [NOXON] desactive le protocole XON/XOFF. 
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Vous pouvez egalement modifier les affectations entre peripMriquca logiqoes et physiques. 
Habituellement, CON: correspond a CRT (clavier/ecran), AUX: a SIO (interface serie en optiOD) 
en LST: a LPT (interface Centronics pour imprimaote). La commande : 

DEVICE LST:-SIO 

envoie tes donnees destinees a. l'imprimante vers l'interface seiie (si celle-ci est mstallee). 

H s'agit d'nn reacheminement de canal, a ne pas confondre avec la commande PIP. Lea deux 
commandes GET <nom de fichier> et PUT <nom de fichier> reorientent les donnees a destination 
et en provenance de la console et les sorties vers l'imprimante en les dirigeant vers un fichier 
particulier et non pas vers un peripherique. 

PIP 

L'utilitaire PIP (Programme d'Interconnexion aux Peripheriques) vons permet d'echanger des 

informations entre l'ordinateur et un peripherique. 

PIP <destination> = <source> 

La <source> et la <destination> peuvent etre soit un nam de fichier (jokers acceptes) pour la 
source, soit le code du peripherique. On pent utiliser les codes suivants : 



En tant que source 

CON: entree console 

AUX : entree auxiliaire 

EOF : marque une fin de fichier 



En tant que destination 

CON : sortie console 
sortie auxiliaire 
imprimante 



AUX: 
LST: 
PRN: 



imprimante avec tabulations suppte- 
mentaires et numeiotation de lignes 
sauts de page. 



Exemples: 

PIP B:-A:*.COM 

. . .copie tous les fichiers avec rextension *-COM de Purite* A sur I'unite' B, 

PIP KEYBOARD.CPM-KEYS.CCP 
. . .realise une copie de KEYS.CCP a Pecran et Pappelle KEYBOARD.CPM 

PIP CON-KEYS.CCP 
. . .envoie le fichier KEY.CCP a l'ecran (meme effet que TYPE KEYS.CCP) 
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PIP LST : KEYS.CCP 

. . envoie le fichier KEY.CCP a I'imprimante 
PIPTYPEIN.TXT-CON: 

. . . place des donnees venant du clavier dans le fichier TYPHN.TXT 

L'operation s'acbeve par un [CONTROLJZ. Pour acceder a une nouvelle ligne, vous deve2 
awoyer a chaque fois un [CONTROL]! (code ASCII du retour a la ligne) apits [RETURN]. 

Si vous tapez PIP sans parametre, vous rccevez le message *: vous pouvez alors entrer les 
commandes qui vous interessent Ce precede" est paracuHerement utile pour la copie de ficbiers 
^uand PIP.COM ne se trouve ni sur la disquette source, ni sur la disquette cible. Vous pouvez 
larger PIP a partir de la face 1 d'une des disquettes systeme, retirer cede disquette et inserer les 
ioquettes requises pour la copie. 

?ow tortir de PIP, appuyez sur [R ETU RN] a Papparition du message*. 

Sotez que PIP ne peut effectuer de copies de fichier sur un systeme a une seule unite On vous 
fcmandera automatiquement de changer de disquette; Les identificateurs du drive destination 
iotvent etre differentes. 

Gestion du systeme 

z$ programmes transitoires D1R, ERASE, RENAME etTYPE offrent plus de possibilites que 

ctirs homologues integres. Comrae de nombreux programmes transitoires de Digital Research, 
can parametres secondaires sont indiques entre crochets. Bi voici quelques exemples : 

Dl R [FULL] affiche la taille et les attributs des fichiers 

ERASE \COM [CON Fl RM] vous demande confirmation pour chaque fichier ren- 
contre 

RENAME vous demande de taper l'ancien et le nouveau nom de 

fichier 

RENAME \SAV-*.BAK renomme tous les fichiers a suffixe .BAK en fichier 

.SAV 

TYPE KEYS. WP [NOPAGE] supprime la pagination de l'ecran 

«:us avons deja evoqu£ les attributs de fichier SYS (systeme) et RO (lecture seulement). La 
■rran de SET qui accepte les jokers , permet de modifier ces attributs et de nombreux autres. 

_n .-ommandes: 

SET* COM [RO] 
SET KEYS.CCP [RO] 

SETA:[RO] 
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affectantFattribut RO (lecture seulement) aux fichiers specifics ou au disque touteatier, de facon 
a empficher un effacement accidenteL 

Les commandes : 

SET *.COM [RW1 i 

SET KEYS.CCP [RW] - 

SETA:[RW] 

affectent Tattribut RW (lecture ecriture) a ces mfimes fichiers. 
Les commandes : 

SET \COM [SYS] 
SET KEYS.CCP [SYS] 

affectent Tattribut SYS aux fichiers specifies. Les fichiers affected de cet attribut ne seront pas 
listes par la commande Dl R (utilisez alors DIRS, ou D1RSYS). Cependant, Us peuventetre utilises 
et de plus, s'ils se trouvent dans la zone utilisateur 0, ils seront disponibles dans toutes les autres 
zones utilisateur. 

Les commandes : 

SET *.COM [DIR] 
SET KEYS.CCP PR] 

retirent 1' attribut SYS. .-,-,...,... 

Vous pouvez affecter aux disquettes une etiquette, un nom ou un mot de passe re'servant l'acces 
de rensemble du catalogue plutot que celui des fichiers qu'il content Vous pouvez egalement 
attribuer des mots de passe a des fichiers individuels. 

SET [NAME-CHRISTIAN] 
SET [PASSWORD-ISABELLE] 
SET [PROTECT-ON] 

agissent sur la disquette de Tunite" par ctefaut 

SET V [PASSWORD-ISABELLE] 
SET V [PROTECT-READ] 

agissent sur les fichiers de la disquette de Tunite" par ddfaut (les jokers *.* indiquent ici que tous 
les fichiers de la disquette sont concem6s par la commande). 

La commande INITDIR (face 2 d'une des disquettes systeme)permetde "marquer" une disquette, 
en vue de la prise en compte de la date et de rbeure lors d'une creation ou mise a jour de fichier. 
Les commandes : 

INITDIR 

SET (CREATE-ON) 

...00... 

SET (ACCESS-ON) 
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...et... 

SET (UPDATE-ON) 

...avec... 

dir (FULL) 

permettent de "marquer" la disqoette (INfTDIR), puis de specifier que la date et Theme seroot 
prises en compte pour la creation et la mise <l jour de fiemer. La commande DIR [FULL] permet 
de visualiser le catalogue de la disquette avec affichage de la date et de l'heure de creation et de 
mise a jour. Vous devez alors taper : 

DATE SET 

a cfaaque lancement de CP/M Phis poor mcttre fboitoge du systeme a rhenre. Elle sera ensuite 
mise a jour i€gulierement par votre ordinateur et vous pourrez la v&ifier par les commandes : 



DATE 



...et. 



DATE CONTINUOUS 

■-%.-■■ :-..■*!*) 

AVERTISSEMENT 

Si vous attribuez a une disquette des mots de passe, une Etiquette ou Tindication de la date et du 
jour, il est recommandee DE NE PLUS y ecrire des donnees sous AMSDOS car aucun des deux 
ne possedent ces fonctions. 



Sauf specification contraire, vous ne pourrez acceder qu'aux fichiers de Tunite* par (tefaut La 
commande: 

SETDEF # A* 

oH ♦ renvoie a Funite par ddfaut) ordonne au CP/M (lors de la recherche des fichiers) de proc6der 
d abord a une recherche dans 1'unite par detaut, puis dans Funite A . Autrement dit, si Best Funite 
ptr d6faut, les fichiers seront automatiquement retrouves meme s'ils n 'existent que dans Tunite 

4 

_es commandes : . . 

SETDEF (PAGE) 
SETDEF (NOPAGE) 

■srvent et ddsactivent la pagination automatique de la console. 

~* ptupart des parametres specifies dans les commandes DEVICE, SET et SETDEF doivent 6tre 
mcabses, tout comme la date, a chaque lancement de CP/M Plus, surtout lorsqu'ils se rapportent 
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aux unites de disquettes (plutot qu'a des fielders ou des disquettes). Ccci est essentiel pour obtenir 
uo fichier PROFILE.SUB correct 

SUBMIT est necessaire a l'execution automatique de fichiers de commandes. Ces ficbiers de 
commande contieonent du texte et il est possible d'y ajouter des lignes de donnees pour des 
programmes si ces demieres commencent par le caractere <. 

Differentes versions de la commande SHOW permettent d'afficber la taille de l'unilg, l'espace 
disponible, le nombre d'entrees du catalogue disponibles sur la disquette avec les zones utilia- 
trices contenant les ficbiers, et, s'il existe, le label de la disquette : 

SHOWB: 

SHOW B:[LABEL] 

SHOW B:(USERS] 

SHOW B:[DIR] 

SHOW B:[DRIVE] " ; % : " : '**'*" ,; 

toutes ces commandes se rapportent a l'unitf B. 

Abandon de CP/M Plus 

AMSDOS 

Ce programme permet l'abandon du controle par CP/M pour reveirir an BASIC AMSTRAD.d' oft 
les commandes AMSDOS de gestion des disquettes sont disponibles. 



■wrr*-* 
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Notes et remarques personnelles 
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Chapitre 6 

Pour information... 



Ce chapitre fournit les infonnations de reference susceptibles de vous aider a 
utiliser votre ordinateur. 

Sujets abordes : 

it Emplacements du curseur et fonctions des codes de controle 

it Interruptions 

it Caracteres graphiques et ASCII 

& References ctes 

it Sons 

it Messages d'erreur 

it Mots cl6s du BASIC 

it Grilles 

it Connexions 

# Imprimantes 

it Manettes de jeu 

it Organisation des disques 

it Extensions r&identes du systeme (RSX) 

it Memoire 

it Emulateur de tenninaux sous CP/M Plus 

it Jeu de caracteres sous CP/M Plus 
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Partie 1 : Emplacements du curseur etfonctions 
des codes de controle 



«*#%* * 



Dans un certain nombre dc progicJels (ou programmes d*applicalioii),le curseur detextepcutse 
trouvcr a l'exteneur de la fenetre utilisee. Certaines appUcauoi«rapUK»ntleairscurcoiTectement 
avant de s'executer. Ce sont : 

1. L'ecriture d'un caractere , 

2. Le dessin du bloc du curseur 

3. L'envoi d'un code de controle marque* d'un asterisque dans les pages smvautes. 
La procedure qui repoaitioone le curseur conectement est la suivante : 

1. Si le curseur est completement a droite, il est ramen6 a l'extrtme gauche de la ligne 
suivante. 

2. S'Usetrouveoimrdeterriert a gauche, fl est rame^ 

3. Si le curseur est au-dessus du bord supeneur, rensemble de la fenetre descend alors 
d'uoe Hgne et le curseur se place sur la derniere ligne. 

4. Si le curseur est en o^essousa^ bord inferieur.Pe^^ 
ligne et le curseur se place sur la derniere ligne. 

Les tests et operations se font dans l'ordre indique. Les positions incorrectes du curseur peuvent 
s'exprimer par un nombre nul ou n6gatif, conespondant a la position a rexteneur du bord gauche 
ou au-dessus d'une fenetre. Les valeurs de caractere deO a 31 ne produisentrien sur l'ecran mais 
sont interpretees comme des codes de controle et ne doivert rm fttre utilises ii^onsia^remenL 
Certains codes changent la signification du ou des caracteres qui les suivent les considerant 
comme parametres d'une fonction particuliere. 

S'il est g6o6x6 a partir du clavier, un code de controle envoye a l'ecran graphique provoque 
simplement raffichage du symbole conventionnel conespondant a sa fonction (exemple : 
&07'BEL*-[CTRL]Q). II ne remplit sa fonction de controle que s'il est envoy6 par l'une des 
commandes suivantes : 

PRINT CHR$(407), ou PRINT' ft "(ft s'obtient en appuyant sur [CTRL]G a l'inteneur de 
rinstmction PRINT). 

Let codes marques d'un asterisque * rectifient la position du curseur a l'ecran - mais peuvent 
laisserle curseur dans une position incorrecte. Les codes etleur signification sontindiqu6sd'abord 
avec leur valeur hexadecimale (&XX) puis avec leur equivalent decimal. 
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Codes de contrdle sous BASIC 



Valeur 


Nam 


&000 


NUL 


&011 


SOH 



&022 



&033 



STX 



ETX 



&044 


EOT 


&05 5 


ENQ 


&06 6 


ACK 


&07 7 


BEL 


&088* 


BS 


&099* 


TAB 


&0A 10 * 


LF 


&0B11* 


VT 


&0C12 


FF 


&0D13* 


CR 


&0E14 


SO 



Parametres Signification 

Pas d'effet Ignorl 

0a255 Afficbe le symbole correspondant a la vafcur 

du parametre. Peraiet ainsi l'afficbage des 
symbolesde0i31. 

supprime le curseur de texte. Equivaut a la 
commande CURSOR accompagnee d'un pa- 
rametre utilisateur egal 4 0. 

Active le curseur de texte. Equivaut a la 
commande CURSOR accompagnee d'un pa- 
rametre egal a 1. Pour afficher un curseur a 
I'inteneur d'un programme BASIC (autre que 
. : . . . le curseur automatique genere par le BASIC en 

attente d'une entree au clavier) il faut faire 
appel a une commande CURSOR avec un 
parametre systeme egal a 1. 

a 2 Active le Mode ecran. Valeur du parametre 

modulo 4. Equivaut a une commande MODE 

a 255 Envoie le caractere cod6 par le parametre a la 

position du curseur graphique. 

Active l'ecran texte (voir &1 5 NAK). 

Emet un Bip (vide les fifes d'attente des canaux 

sonores). 

Deplace le curseur d 'une colonne a gauche. 

Deplace le curseur d'une colonne a droite. 

Deplace le curseur d'une ligne vers le has. 

Deplace le curseur d'une ligne vers te haut 

Efface l'ecran de texte et place le curseur en 
haut a gauche ; equivaut a une commande 
CLS. 

Amene le curseur au bord gauche de la ligne 
suivante. 

a 15 De"finit 1'Encre du Papier « Commande PA- 

PER. Valeur du parametre modulo 16. 
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&0F15 
&10 16* 
All 17* 

&12 18 * 

&13 19 * 



SI 

DLE 
DC1 

DC2 

DO 



0415 



&1420* 


DC4 




&15 21 


NAK 




&1622 


SYN 


041 


&17 23 


ETB 


043 



&1824 CAN 

&1925 EM 



04 255 
4255 
04255 
4255 
04255 
4255 
04255 
04255 
4255 



D6flnit l'encre du stylo - Commande PEN. 
Valeur du parametre modulo 16. 

Efface le caractere. Remplit la matrice du ca- 
ractere avec la couleur du Papier. 

Efface depuis le bord gauche de la fenetre 
jusqu'au caractere courant en remplissant les | 
matrices de caractere concernees avec l'encrc 

du papier. 

Efface 4 partir du caractere couraut (inclus) 
jusqu'au bord droit de la fenetre. Remplit les 
matrices de caracteres concernees avec l'encre 
du Papier. 

Efface depuis le debut de la fenetre jusqu'au 
caractere couranL Remplit avec l'encre du pa- 
pier. 

Efface 4 partir du caractere jusqu'4 la fin de la 
fenetre. Remplissage avec l'encre du Papier. 

Desactive l'ecrab texte. Rien ne s'afficbera 
jusqu'4cequ'un caractere ACK(&066) aitttf 
envoys 

PararnetreiMdiiloZOsupprimelemDde trans- 
parent 

Parametre modulo 4. 

valide le mode d'encre graphique NOR- 

1 valide le mode d'encre graphique XOR (ou 

eXCUlSif) u- AKTT»/At\ 

2 valide le mode d'encre graphique AND (et) 

3 valide le mode d'encre graphique OR (ou 
inclusif) 

Echange des encres papier et stylo. 

Equivaut 4 la commande SYMBOL. Admet 9 
r^ameu^sdontlepi^mierconcernelecodedu 

caractere. Les suivants correspondent chacun 
a une ligne de la matrice des caracteres. Le bit 
de poids le plus fort du premier octet corre- 
spond au point superieur gauche du caractere 
tandis que le plus f aible correspond 4 son point 
inferieur droit 
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&1A26 


SUB 


1180 
1380 
1425 

1425 


BtaUit la fenfttre - commande WINDOW. Les 
deux premiers parametres (tefinissent les bords 
gauche et droit 


&1B27 


*sc ,: 




Pas d'effet Ignorl 


&1C28 


FS 


0415 
0431 
0431 


Attribue deux couleurs 4 une encre. Eqoivaut 
4 une commande INK. Le premier parametre 
deiinit le numero de rencre (modulo 16) 


&1D29 


GS 


0431 
0431 


Attribue 2 couleurs au cadre (border). Equi- 
vaut 4 la commande BORDE R. Les 2 parame- 
tres (modulo 32) specifient les deux couleurs. 
Les valeurs 27 et 31 sont iode'rlnies. 


&1B30 


RS 




Amene le curseur vers le coin supeneur gauche 
de la feneire. 


&1F31 


US 


1480 
1425 


Amene le curseur 4 une position dounee dans 
la fenetre courante. Equivaut 4 une commande 
LOCATE. Le premier parametre specific la 
colonne et le second la ligne. 



L'organisation interne du 6128/464 est assuree par un systeme d'exploitation perfectionne* 
ttavaillant en temps reel. Le systeme d'exploitation gere le 'trafic des informations" dans 
rordinateur depuis les entrees jusqu'aux sorties. 

D sert principalement de lien entre la machine et Pinterpreteur BASIC - pour les couleurs 
cUgnotantes, par exemple, le BASIC passe les parametres au systeme d'exploitation qui organise 
le travaiL L'un determine ce qu'il faut faire et 1 'autre quand il faut le faire. 

Le systeme d'exploitation fait partie du logiciel integre' 4 la machine (que les anglais appeuent 
f irm war e, c'est-4-dire m61ange de hardware et de software), n contient les routines en code 
machine appelees par le BASIC. 

Si vous de"sirez experimenter les commandes POKE et CALL, commencez par sauvegarder et 
ki*er votre programme, car vous risqueriez de regretter vos manoeuvres. 

• programmer en code machine, vous devez faire appel 4 un assembleur. 
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Partie 2 : Interruption de programme 



Pour implementer plusieurs informations mnm-tflches, le 6128 et le 464 font appel aux intemip- 
tions du Z80, dont AFTER et EVERY sont des exemples. Void l'ordre de priority des compteurs 
d'evenement: 

Rupture ([ESC][ESC]) 

Compteur3 

Compteur 2 (et les 3 files d'attente des canaux sonores) 

Compteur 1 

Compteur 

Les interruptions doivent tenir compte des 6tats intennAHaires d'une variable. Le sous-programme 
d'intermption doit eviter les interactions indesirables avec l'&at des variables du programme 
principal. 

Les files d'attente des canaux sonores ont des interruptions de m£me priorite". Ainsi, lorsque le 
sous-programme d'interruption d'une file d'attente d'un canal sonore s'execute, il ne peut etre 
interrompu par aucune autre file d'attente. Ceci permet aux sous-programmes d'interruption de 
partager des variables en evitant les incidences facheuses que nous venons d'evoquer. 

Quand une interraption propre a la filed'attente d'un canal sonore a 6tt autorisee (a l'aide de ON 
SQ GOSUB), elle est irnm6diatement prise en compte si la file concemant le canal n'est pas 
pleine. Dans le cas contraire, elle se produit a la fin de la generation sonore courante (s'il reste de 
la place dans la file). Le fait d'etre interrompu, devalide revenement de sorte que le sous- 
programme d'interruption doit proceder a la nouvelle autorisation pour que d'autres intemiptions 
soient susceptibles d'intervenir. 

La tentative de g6nerer uu son et de tester l'etat de la file a egalement pour consequence de 

devalider une interruption. 
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Partie 3 : Caracteres ASCII at graphlques 



ASCII 

A titre de reference, nous reproduisons ici le jeu de caracteres standard ASCII avec la notation 
ddcimale, octale et hexadecimale. Les pages suivantes donnent le detail de chaque matrice de 
caracteres du 61 28/464. 



DECI. 


OCTAL 


HEXA 


CWKttresASai 


DECK 


OCTAL 


HEXA. 


ASCII 


OECL 


OCTAL 


HEXA 


ASCII 





OOO 


00 


NUL([CTHL)9! 


50 


062 


32 


2 


100 


144 


64 


d 


1 


001 


01 


SOHaCTRLJA) 


51 


063 


33 


3 


101 


145 


65 


a 


2 


002 


02 


STXaCTRL]B) 


52 


064 


34 


4 


102 


146 


66 


f 


3 


003 


03 


ETX(fCTRgC) 


53 


065 


35 


5 


103 


147 


67 


9 


4 


004 


04 


EOTflCTRLJD) 


54 


066 


36 


6 


104 


150 


68 


h 


5 


005 


05 


ENQQCTRLJE) 


56 


067 


37 


7 


105 


151 


69 


1 


e 


006 


06 


ACKflCTRLJF) 


56 


070 


38 


8 


106 


152 


6A 


J 


7 


007 


07 


BaflCTHLX? 


57 


071 


39 


9 


107 


153 


68 


y 


8 


010 


OB 


BSOCTRIJH) 


66 


072 


3A 




108 


154 


6C 


i 


9 


011 


09 


HTflCTMJI) 


59 


073 


38 


; 


109 


155 


6D 


Rl 


10 


012 


OA 


LFflCTRlM 


60 


074 


3C 




110 


156 


6E 


n 


11 


013 


OB 


VTflCTRlJK) 


61 


075 


30 


■ 


111 


157 


6F 





12 


014 


X 


FF0CTRL1L) 


62 


076 


3E 




112 


160 


70 


P 


13 


015 


OD 


CfiflCTRLIM) 


63 


077 


3F 


1 


113 


161 


71 


q 


14 


014 


OE 


SOdCTRlM 


64 


100 


40 


9 


114 


162 


72 


r 


15 


017 


OF 


SflCTRLJO) 


65 


101 


41 


A 


115 


163 


73 


I 


16 


020 


10 


DLEUCTmjP) 


66 


102 


42 


B 


116 


164 


74 


t 


17 


021 


11 


OC1 QCTRLP) 


67 


103 


43 


C 


117 


165 


75 


u 


18 


022 


12 


DC2flCTRL)fl) 


68 


104 


44 





118 


166 


76 


V 


19 


023 


13 


OC3(ICTRL)S) 


69 


105 


45 


E 


119 


167 


77 


w 


20 


024 


14 


OC40CTRLJD 


70 


106 


46 


F 


120 


170 


78 


X 


21 


025 


15 


NAKdCTRLJU) 


71 


107 


47 


G 


121 


171 


79 


» 


22 


026 


16 


SYNflCmqV) 


72 


110 


48 


H 


122 


172 


7A 


z 


23 


027 


17 


ETBdCTRLlW) 


73 


111 


49 


1 


123 


173 


7B 


{ 


24 


030 


16 


CANQCTRIJX) 


74 


112 


4A 


J 


124 


174 


7C 


1 


25 


031 


19 


EMfCTRUY) 


75 


113 


4B 


K 


125 


175 


7D 


> 


26 


032 


1A 


SUBflCTRLJZ) 


76 


114 


4C 


L 


126 


176 


7E 


- 


27 


033 


1B 


ESC 


77 


115 


4D 


14 










28 


034 


1C 


FS 


78 


116 


4£ 


N 










29 


035 


ID 


GS 


79 


117 


4F 













30 


036 


1E 


R3 


80 


120 


50 


P 










31 


037 


1F 


US 


61 


121 


51 


Q 










32 


040 


20 


SP 


82 


122 


52 


fl 










33 


041 


21 


! 


83 


123 


53 


8 










34 


042 


22 


■ 


84 


124 


54 


T 






1 a 




36 


043 


23 


* 


85 


125 


55 


U 










36 


044 


24 


$ 


86 


126 


56 


V 










37 


045 


25 


* 


87 


127 


57 


w 










39 


046 


26 


& 


SB 


130 


58 


X 










39 


047 


27 


• 


89 


131 


59 


Y 










40 


050 


28 


( 


90 


132 


5A 


z 










'41 


051 


29 


) 


91 


133 


58 


[ 










42 


052 


2A 




62 


134 


5C 


\ 










43 


053 


2B 




93 


135 


50 


1 










44 


054 


2C 


, 


196 


5E 














45 


055 


2D 


- 


96 


137 


5F 


- 










46 


056 


2E 




96 


140 


60 


* 










47 


057 


2F 


; 


97 


141 


61 


a 










48 


060 


30 





98 


142 


62 


b 










« 


061 


31 


1 


99 


143 


63 
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Jeu de caracferes graphfques spSdflques i la machine 

Le« caracttes reprtseaitai id soot corneous dans la matricc standard 8x8 utiliafc poor l'affidi«|C 
do 6128 et do 464. Ummmew petit generer des caractferes et let grouper on lea aHgoer pour 
obtenir divert efleti speciaux (voir le paragrapbe , X^ractereade^niiparrutili$atear' , duchapitxe 
"A voi hemes de loitir..."). 



:!i=!i 



33 

4H21 
4X001 0000J 



BBS 



34 
4H22 

4X00100010 



nssv: 



35 

4H23 

4X00100011 



32 &H20 
4X00100000 



E 



HS: m\ 




36 

4H24 

4X00100100 




37 

&H25 

4X00100101 



Trior. 



38 

4H26 

4X00100110 



:5K 



39 

4H27 
4X00100111 



ffi5 




:S;i 



40 

4H28 

4X00101000 




MHM 



42 

4H2A 
4X00101010 



PHI 



m m 



43 

4H2B 

&X00101011 



44 

4H2C 

4X00101100 







45 

4H2D 

4X00101101 



fl 



46 

4H2E 

4X00101110 



m 



47 

4H2F 

4X00101111 




48 

4H30 

4X00110000 



Page 236 Chapftre 6 



Pour Information 




■■■■«■ - 
tTTTTt: 



11 

&ffffl: 



49 

4H31 

4X00110001 



£ffl£: 



m 



m 



50 

4H32 

4X00110010 



aw 



&! 



51 
4H33 

4X001 10011 



m 



53 

4H35 

4X00110101 



ffl 



ffl 



54 

4H36 
4X00110110 



;:* 



a 



57 

4H39 
4X00111001 



EB 



fflff 



fflS! 



58 

4H3A 

4X00111010 



gP 



61 

4H3D 

4X00111101 



W 



ffl 



62 

4H3E 

4X00111110 



EH 




65 

4H41 

4X01000001 



66 

4H42 

4X01000010 



55 

&H37 

4X00110111 



=:*!!! 



■i 

33 



59 

4H3B 

4X00111011 



m 



m m 



63 

4H3F 

4X00111111 



F m 



m 



67 

4H43 

4X01000011 



52 

4H34 

4X00110100 



56 

4H38 

4X00111000 



r 



ffli: 



60 

4H3C 

4X00111100 




64 

4H40 

4X01000000 



swra 




68 

4H44 

4X01000100 
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:PE 



■■■■ 



F?m 



69 

4H45 

4X01000101 




fflHffl: 



:*Ks£ 



s ; 




77 

4H4D 
4X01001101 






81 

*H51 

4X01010001 







fflH 



70 

4H46 

4X01000110 



:aa 






73 


74 


4H49 


4H4A 


4X01001001 


4X01001010 



BKSj: 



78 

4H4€ 

4X01001110 



Us: 



82 

4H52 

4X01010010 






85 


86 


4H55 


&H56 


4X01010101 


4X01010110 



fr! 



Pfflffl: 



71 

4H47 

4X01000111 




Hffiffl 



11: 



79 

4H4F 

4X01001111 






83 
4H53 

4X01010011 




87 

4H57 

4X01010111 




72 

4H48 

4X01001000 



sr 



fflfflf; 



75 


76 


4H4B 


4H4C 


4X01001011 


4X01001100 



BE 



Si 

HH:::: 



80 

4H50 

4X01010000 




" 'ffn " : 



84 

4H54 

4X01010100 






m i 



88 

4H58 

4X01011000 
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89 

4H59 

4X01011001 




90 

4H5A 

&X01011010 




: nnT:: 



91 

&H5B 

4X01011011 



1 



92 

4H5C 

4X01011100 



i 



fflll; 



93 

4H50 

4X01011101 



BSSS 




94 

4H5E 

4X01011110 



^■■■■■■1 



ra 



95 96 

4H5F 4H60 

4X01011111 4X01100000 



B 



97 

4H61 

4X01100001 



Si: 



98 

4H62 
4X01100010 



3w¥ : 

i mm : 



JhTS 

■MSB 



99 100 

4H63 . 4H64 

4X01 100011 4X01100100 




101 

4H65 

4X01100101 



3 



AH 



102 

4H66 

4X01100110 



-HUB! 



103 

4H67 

4X01100111 




104 

4H68 

4X01101000 



BBS 



idsn;; 



105 

4H69 

4X01101001 




106 

4H6A 

4X01101010 




ffffTiT: 



107 

4H6B 

4X01101011 




108 

4H6C 

4X01101100 
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m 



PSK 




109 

&H6D 

4X01101101 



P 

m 



113 

4H71 

4X01110001 



Mt 



117 

4H75 

4X01110101 



r 1 ' 



m 

zasmm 







110 

4H6£ 
4X01101110 



vm 




114 

4H72 
4X01 110010 



B 




118 

4H76 

4X01110110 




121 


122 


4H79 


4H7A 


4X01111001 


4X01111010 




125 


126 


4H7D 


4H7E 


4X01111101 


4X01111110 



111 

4H6F 
4X01101111 




115 

4H73 

4X01110011 



ffbw 



n: 



ess: 



119 

4H77 

4X01110111 




123 

4H7B 

4X01111011 





112 

4H70 

4X01110000 



gi*SS 




\m\ 



116 

4H74 

4X01110100 




120 

4H78 

4X01111000 




124 

&H7C 

4X01111100 



127 128 

4H7F 4H80 

4X01111111 4X10000000 
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n 


II 








■■■i 








■■■i 








■■■i 








|J_ 






























1. 











129 
4H81 

4X10000001 




130 

&H82 

4X10000010 



■■■■■■■■ 
■■■■■■■I 
■■■■■■■I 
■■■■■■■■ 











131 

4H83 

4X10000011 



























■ ■■ 




■■■■_ 




■Mi- 




ma 





132 

4H84 

4X10000100 



■■■■ 
■■■■ 


- 








■■■■ 










■■■■ 
■■■■ 










■■■■ 










■■■■ 










■■■■ 











133 

4H85 

4X10000101 



■■■ 



■■■■ 

1MM1 



134 

4H86 

4X10000110 



■■■■■■■I 

iiH 



135 

&H87 

4X10000111 



































■ 


■■■ 


■■■■ 


■ 


■Ml 


■■ 


^ 


■ 



136 

4H88 
4X10001000 



■■■■ _ 






■■■■ 






■■■■_ 






llll 






I 


!■■ 


Ml 


!■■ 


■■■■ 
111! 



■■■■ 


) ■■■■ 
■■■■ 


■■■■ 


■■■■ 


■■■■ 


■■■■ 



137 


138 


4H89 


4H8A 


4X10001001 


4X10001010 



*■*■■■■! 

EfflEKS 



139 

4H8B 

4X10001011 



140 

4H8C 

4X10001100 



■■■£ Jr :■■■■ 

■■■a: tt _■■■■ 

■■■■I ^ TT ■■■■ 



■■■■■■Ml 



■ ■■■j«J 

141 

4H8D 

4X10001101 



:: 

JU 



142 

4H8E 

4X10001110 



i 



JUWMM 



■■■■«*■■ 

■■■•■■■■ 
■■■■■■■■ 
■■■■■■■■ 
■■■■■■■■ 
■■■■■■■■ 



143 

4H8F 

4X10001111 



■aai 

m 



"in 
u 



144 

4H90 

4X10010000 















:!!■■ 




■■ _ _ 




i 1 _■■ - 




!!__ 





145 


146 


147 


148 


4H91 


4H92 


4H93 


4H94 


4X10010001 


4X10010010 


4X10010011 


4X10010100 
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IS 



149 

4H95 

4X10010101 




150 

4H96 

4X10010110 



fflT 



MP 



153 

4H99 

4X10011001 



154 

4H9A 

4X10011010 





157 
&H90 
4X1001 1101 



rara 



i 



158 

4H9E 

4X10011110 



BSEBS 



161 

4HA1 

4X10100001 




162 

4HA2 

4X10100010 



w* 



m 





151 

&H97 

4X10010111 



HI 



152 

4H98 

4X10011000 






165 

4HA5 

4X10100101 



166 

4HA6 

4X10100110 



155 

4H9B 

4X10011011 



@@ 



156 

4H9C 

4X10011100 





159 

4H9F 

4X10011111 



rrrrnr.. 

163 

4HA3 

4X10100011 



1o0 

&HA0 

4X10100000 



cr 



164 
4HA4 

4X10100100 




167 

4HA7 

4X10100111 



168 

4HA8 

4X10101000 
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169 

4KA9 

4X10101001 



B 



m 



173 

4HAD 

4X10101101 




170 

4HAA 

4X10101010 




174 

4HAE 

4X10101110 



mTTiT: 



::# 



.■■ 
.■I 
.■■ 



fl 



175 

4HAF 

4X10101111 



H 



JBB 



!!i!!! 



171 172 

4HAB &HAC 

4X10101011 4X10101100 




176 
4HB0 

4X10110000 



:i# 



AH 



Ft¥ : 

as: 



177 

4HB1 
4X10110001 




178 

4HB2 

4X10110010 



11 



179 

4HB3 

4X10110011 







fflm ; 



180 
4HB4 

4X10110100 




181 

4HB5 

4X10110101 







a; 



182 

4HB6 

4X10110110 




183 

4HB7 

4X10110111 



■!■■ 



184 

4HB8 

4X10111000 



185 

4HB9 

4X10111001 






m m 



186 

4HBA 
4X10111010 



■ 



187 

4HBB 

4X10111011 




188 

4HBC 

4X10111100 
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189 

4HBD 

4X101111Q1 



190 
4HBE 

4X10111110 



191 
4HBF 

4X10111111 



Z-Ml 



g S!h! 



■ 



192 
4HC0 

4X11000000 



as 



193 

4HC1\ 

4X11000001 



194 

4HC2 

4X11000010 



195 

4HC3 

4X11000011 



196 

4HC4 

4X11000100 



89 



ill 



m 






197 

4HC5 

4X11000101 




Slli 



198 

&HC6 

4X11000110 



ffiSS 



199 

4HC7 

4X11000111 



200 

4HC8 

4X11001000 




SSS tes 




s 



201 

4HC9 

4X11001001 



202 

4HCA 

1X11001010 



203 

4HCB 

4X11001011 



204 

4HCC 

&X11001100 



m 



M. 



as 






205 
4HCO 

4X11001101 



206 

4HCE 

4X11001110 



207 

&HCF 

4X11001111 



208 

4HO0 

4X11010000 
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209 

4HD1 

4X1 1010001 






213 

4HD5 

4X11010101 




217 

4HD9 

4X11011001 



m 



■1 








■1 








■1 








■I 








■1 








■I 








■■ 








■■. 









210 

4HD2 

4X11010010 



211 

&HD3 

4X11010011 













T | 












■1 












■ ■■ 










■■1 


•■■■I 

■■■■■I 

■■■■■■■ 

■■■■■■■■ 



JT 




■gr 




■■■ . 




■■■■ 




niirrn 

■■■■■■ 
■■■■■■■ " 



214 

4HD6 

4X11010110 



215 

&HD7 

4X1 10101 11 




218 

4HDA . 
&X11011O10 



219 

4HDB 

4X11011011 



■ 



II 



gsus; 

■■Mi ^ 

1 




212 

4HD4 

4X11010100 



^ 



("■■■an . 

r.w.w 



ws fsm 



■■■■■■■ 

■■■■■■ 




JI 




!■■ 



225 

4HE1 

4X11100001 



226 

4HE2 

4X11100010 



227 
4HE3 

4X11100011 



216 

4HD8 

4X11011000 



■ ■ 



220 

4HDC 

4X11011100 



■■TTTBi 

■■■■■■■■ 
-■■■■■■ 



221 


222 


223 


224 


4HD0 


4HDE 


4HDF 


4HE0 


4X11011101 


4X11011110 


4X11011111 


4X11100000 



■■■■■■I _ 
■■■■■■ 



a 



228 

4HE4 

4X11100100 
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m 



229 

4HE5 

4X1 1100101 




230 

4HE6 

4X11100110 




231 

4HE7 

4X11100111 




232 

4HE8 

4X11101000 




233 

4HE9 

4X11101001 



m 




234 

4HEA 

4X11101010 




235 

4HEB 

4X11101011 



■■■I 




236 

4HEC 

4X11101100 



mm 



Cm 



sai 



237 

4HED 

4X11101101 




238 

4HEE 

4X11101110 



■8*5%w : 



239 

4HEF 

4X11101111 



■■■■■■ 




240 

4HF0 

4X11110000 




B::[v 
"Srr 



241 

4HF1 

4X11110001 



rp" tfrm nil '^m 

IJtffF fttfffif 



242 

4HF2 

4X11110010 




243 

4HF3 

4X11110011 




244 

4HF4 

4X11110100 




Ett~ 




iwrr 
























£ 



245 


246 


247 


248 


4HF5 


4HF6 


4HF7 


4HF6 


4X11110101 


4X11110110 


4X11110111 


4X11111000 
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249 

4HF9 

4X11111001 




■ ■■■■ 



Mi 




250 

4HFA 

4X1 1111010 







251 

4HFB 

4X11111011 



ffiRffl 




253 


254 


255 


4HF0 


4HFE 


4HFF 


4X11111101 


4X11111110 


4X11111111 



TTT 






252 

4HFC 

4X11111100 
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Partie 4 : Reference des touches 



Yaleur ASCII par dSfaut (HEX) 






m s 1 1 hi I s 1 



79 I 75 I 09 






E 81 I 73 I 84 I 66 1 67 || 66 1 6A \ 68 H 6C 



"* , 7thliillhL l4 - ,4QI - ,3E 



6£ I 6Q | ZC 1 26 



20 
20 




JOYSTICK O 



JOYSTICK 1 







OB 

OB 












08 
08 


tTR£2j 
58 
58 


RRE1 
5A 
5A 


09 
09 












OA 
OA 











26 
36 












12 
8 


IFIRE 2 

07 
47 
«7 


FIRE1 
06 
46 
6« 


14 
54 

74 












25 

35 




- 
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Touches programmable^ valeurs et emplacements par dtfaut 



.^/Tjijxanjojxru-Lri/uiJTJTrv^ 



3 



N/A I N/A 



N/A I N/A N/A | N/A | 



N/A N/A N/A I N/A I N/A N /A I N/A I N/A 



N/A H N/A I N/A N/A I N/A 



N'A I N/A 



N/A I N/A I N/A 



N/A B N/A I N/A 1 N/A I N/A I N/A 



N/A I N/A I N/A N/A H N/A I N/A | N/A 



N/A 



t3S 



136 



m 



I N/A In/A I N/A In,A IN/A jN/A J N/A N/A | N/A I g| I N/A J Tg 



N/A 



N/A 



N/A 



N/A 



N/A 



N/A 



N/A I N/A I N/A 



TOUCHES 
PR0QRAMMABLE9 


VALEUR PAR DEFAUT 


CAHACTERE 


VAlEUflASCa 


0(128) 
1(129) 
2(130) 
3(131) 
4(132) 
5(133) 
6(134) 
7(135) 
6(136) 
9(137] 
10(138) 
11(139} 
12(140) 



1 
2 
3 
4 
5 
6 
7 
8 
9 

(RETURN] 
RUNTRETURN] 


&30 
431 
432 
S33 
434 
435 
136 
437 
438 
439 
&2E 
&0D 
452 455 44E &22 400 


Hemarquc:La valeur par dahtlt dw touch— program mabtes 13a 
431 (141 a 159) est agate 1 0. Da* vateurs at das touches lew sort 
aff ectees d I'alde des commandes KEY et KEYDEF respectfvement 
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Numfros des touches et des positions des manettes de |eu 



TjxrmrumJxru-trumrLruuuu^ 



6 6|&»|e5|57|56|49|48|4l|4o|33|32|25|34|is|70 
68 | S7 J 56 | 58 | 5Q | SI | 43 | 42 | 35 | 34 | 27 j 26 | 17 | B 



TO Ieo|6o|6l|63l52l44l45l37l36l29l26ll9 



21 | 71 | 63 | 62 | 55| ^ |4e|3a| 39| 31 |3o|22| 21 



23 I 9 



47 




JOYSTICK 






72 












74 


RRE2 

76 


FWEt 
77 


75 












73 







JOYSncxt 







48 












50 


nF£2i RfiEl 
52 1 53 


51 












40 
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Partie 5 : Les sons 



Notes et pSriodes sonores 

La table suivante donne les periodes sonores pour les notes des huit octaves du 464/6128 Plus. 

La frequence produite n'est pas totalement exacte car elle est calculee a paitir d'un norabre entier. 
L'ERREUR RELATIVE s'obtient en calculant le pourcentage de la difference enrre la frequence 
theorique et la frequence reelle par rapport a la frequence reelle. 



NOTE 


FREQUENCE 


PERIODE 


ERREUR RELATIVE 


C 


16.352 


3822 


-0.007% 


C# 


17.324 


3608 


+0.007% 


D 


18.354 


3405 


-0.007% 


D# 


19.445 


3214 


-0.004% 


E 


20.602 


3034 


+0.009% 


F 


21.827 


2863 


-0.016% Octave^ 


F# 


23.125 


2703 


+0.009% 


G 


24.500 


2551 


-0.002% 


G# 


25.957 


2408 


+0.005% 


A 


27.500 


2273 


+0.012% 


A# 


29.135 


2145 


-0.008% 


B 


30.888 


2025 


+0.011% 


NOTE 


FREQUENCE 


PERtODE 


ERREUR RELATIVE 



C 


32.703 


1911 


-0.007% 


C# 


34.648 


1804 


+0.007% 


O 


36.708 


1703 


+0.022% 


D# 


38.891 


1607 


-0.004% 


E 


41.203 


1517 


+0.009% 


F 


43.654 


1432 


+0.019% Octave -3 


F# 


46.249 


1351 


-0.028% 


G 


48.999 


1276 


+0.037% 


G# 


51.913 


1204 ( 


+0.005% 


A 


55.000 


1136 


-0.032% 


A# 


58.270 


1073 


+0.039% 


B 


61.735 


1012 


-0.038% 



formation 
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NOTE 


FREQUENCE 


PERIODE 


ERREUR RELATIVE 


c 


65.406 


956 


+0.046% 




c# 


69.296 


902 


+0.007% 


• v---- i-.| stilftr 


D 


73.416 


851 


-0.037% 




D# 


77.782 


804 


+0.058% 




P 


82.407 


758 


-0.057% 




F 


87.307 


716 


+0.019% 


Octave -2 


F# 


92.499 


676 


+0.046% 




Q 


97.999 


638 


+0.037% 




G# 


103.826 


602 


+0.005% 




A 


110.000 


568 


-0.032% 




A# 


116.541 


536 


-0.055% 




B 


123.471 


506 


-0.038% 




NOTE 


FREQUENCE 


PERIODE 


ERREUR RELATIVE 


c 


130.813 


478 


+0.046% 




c# 


138.591 


451 


+0.007% 




D 


146.832 


426 


+0.081% 




D# 


155.584 


402 


+0.058% 




E 


164.814 


379 


-0.057% 




F 


174.614 


358 


+0.019% 


Octave -1 


F# 


184.997 


338 


+0.037% 


i 


G 


195.998 


319 


+0.037% 


i 


G# 


207.652 


301 


+0.005% 


I 


A 


220.000 


284 


-0.032% 




A# 


233.082 


268 


-0.055% 




B 


246.942 


253 


-0.038% 


IL- 
LATIVE 


NOTE 


FREQUENCE 


PERIODE 


ERREUR RE 


c 


261.626 


239 


+0.046% 


DO medium 


C# 


277.183 


225 


-0.215%, 




D 


293.665 


213 


+0.081% 




D# 


311.127 


201 


+0.058% 


i 


E 


329.628 


190 


+0.206% 


1." 


F 


349.228 


179 


+0.019% 


Octave 


F# 


369.994 


169 


+0.046% 


f 


G 


391 .995 


159 


-0.277% 




G# 


415.305 


150 


-0.328% 




A 


440.000 


142 


-0.032% 


LA Internationtf 


A* 


466.164 


134 


-0.055% 




B 


493.883 


127 


+0.356% 





QM4C4 1 


"ttani+ro fl 




_ ~ 


Pour irrtor- -am 



NOTE 


FREQUENCE 


PERIODE 


ERREUR RELATIVE 


C 


523.251 


119 


-0.374% 


c# 


554.365 


113 


40.229% 


D 


587.330 


106 


-0.390% 


D# 


622.254 


100 


-0.441% 


E 


659.255 


95 


+0.206% 


F 


698.457 


89 


-0.543% Octave 1 


F# 


739.989 


84 


-0.548% 


G 


783.991 


80 


+0.350% 


G# 


830.609 


75 


-0.328% 


A 


880.000 


71 


-0.032% 


A# 


932.328 


67 


-0.055% 


B 


987.767 


63 


-0.435% 


NOTE 


FREQUENCE 


PERIODE 


ERREUR RELATIVE 


C 


1046.502 


60 


+0.462% 


C# 


1108.731 


56 


-0.662% 


D 


1174.659 


53 


-0.390% 


D# 


1244.508 


50 


-0.441% 


E 


1318.510 


47 


-0.855% 


F 


1396.913 


45 


+0.574% Octave 2 


F# 


1479.978 


42 


-0.548% 


G 


1587.982 


40 


+0.350% 


G# 


1861.219 


38 


+0.992% 


A 


1760.000 


36 


+1.357% 


A# 


1864.655 


34 


+1.417% 


B 


1975.533 


32 


+1.134% 


NOTE 


FREQUENCE 


PERIODE 


ERREUR RELATIVE 


C 


2093.004 


30 


+0.462% 


C# 


2217.461 


28 


-0.662% 


D 


2349.318 


27 


-1.469% 


D# 


2489.018 


25 


-0.441% 


E 


2637.021 


24 


+1.248% 


F 


2793.826 


22 


-1.685% Octave 3 


F# 


2959.955 


21 


-0.548% 


G 


3135.963 


20 


+0.350% 


G# 


3322.438 


19 


+0.992% 


A 


3520.000 


18 


+1 .357% 


A# 


3729.310 


17 


+1.417% 


B 


3951.066 


16 


+1.134% 
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Ces valeurs sont toutes cakulees k partir du LA International comme suit : 

FREQUENCE- 440*(2T (OCTAVE +((N-10)/1 2))) 
PERIODE - ROUND (62500/FREQUENCE) 

ou N est €gal 4 1 pour do, 2 pour do difese, 3 pour r6, etc 



few*? 



*&J 
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Partie 6 : Messages d'erreur du BASIC 



1 Unexpected NEXT (NEXT fnattemlu) 

Une commande N EXT a ete rencontree sans que la commande FOR n'ait lance de boucle ou bien 
la variable suivant NEXT ne correspond pas a celle de la boucle FOR. 

2 Syntax Error (erreur de syntaxe) 

Le BASIC ne comprend pas la ligne a cause d'une construction non permise (ties souvent une 
faute de frappe). 

3 Unexpected RETURN (RETURN Inattendu) 

Une commande RETURN survient sans qu'il y ait de sous-programme en cours. 

4 DATA exhausted (II n'y a plus de donnees (DATA)) 

Une commande READ a essaye de lire une ligne de DATA epuisee. 

5 Improper argument (argument Incorrect) 

Erreur d'ordre general. L'argument d'une fonction ou le parametre d'une commande n'est pas 
acceptable. 

6 Overflow (depassement arfthmetJque) 

Se produit lorsqu'une operation arithmetique dCpasse les Iimites. Le chiffre en virgule flottante 
est devenu trop grand (supCrieur a 1 .7ET38) ou a fait Pobjet d'une tentative de conversion en un 
oombre entier trop grand. 

7 Memory full (memoir© saturee) 

Le programme ou ses variables sont trop grands pour la memoire ou la structure des boucles et 
trop compliquee (trop de GOSUB, WHILE et FOR imbriques), 

MEMORY produira cette erreur si vous tentez de fixer trop bas la valeur maximale du BASIC ou 
si vous lui affectez une valeur beaucoup trop haute. A cbaque fichier ouvert est affectf un tampon 
de memoire, ce qui peut etre une cause de limitation pour la commande MEMORY. 

8 Line does not exist (ligne inexlstante) 

Le numero de ligne reference" n'existe pas en memoire. 

Subscript out of range (indie© hors llmrte) 

Un des indices de votre tableau est trop grand ou trop petit 
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10 Array already dimensioned (tableau deja dimenslonne) ... 

Un des tableaux d'une instruction DIM a deja £te d6Qni. 

1 1 Division by zero (division par zero) ..... , : „_ . ., , . . . , : .^^ ;l 
Peut se prodirire dans la division d'un reel, d'un entier, I'utilisation de modulo, etc... 

12 Invalid direct command (commande directe non valable) 

La commande n'est pas acceptable en mode direct 

13 Type mismatch (types de variable ne correspondant pas) 

On a donn6 une valeur numerique pour une chalne alpbanum6rique ou vice-versa ou un nombct 
non valable a 6te d£couvert par une commande READ ou INPUT. 

14 String space full (espace reserve aux chaTnes sature) 

D. y a tenement de chalnes qu'il n'y a plus de place, meme apres une remise en ordre. 

15 String too long (chalne trop longue) 

Une chalne a plus de 255 caracteres, ce qui peut arriver lore d'une concatenation de chalne*. 

16 String expression too dcomplex (chatnetrop compliquee) 

Des expressions de chalnes peuvent produire des valeurs intermedi aires qui, si elles soot 1 
nombreuses, conduisent le BASIC a donner ce message. 

17 Cannot CONTInue (on ne peut pas CONTlnuer) 

Le programme ne peut pas poursuivre son execution avec CONT, qui sert apres une . 
STOP, [ESC][ESC] ou une erreur. Notez que si le programme a &6 modifie entre-temp*. : 
impossible de le relancer par cette commande. 

18 Unknown user function (fonction incoflfuie) 

On a oublie de definir la fonction FN avec la commande DEF FN auparavant 

19 RESUME missing (commande RESUME absente) 

On a trouvd la fin de programme alors que celui-ci procedait a un traitement d'erreur : 
d'une declaration ON ERROR GOTO). 

20 Unexpected RESUME (RESUME inattendu) 
RESUME n'est valide que pendant un traitement d'erreur ON ERROR GOTO. 

21 Direct command found (commande directe trouvee) 

En chargeant un programme, une ligne sans numero s'est presentee. 
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22 Operand missing (operande absent) 

Le BASIC vient de tomber sur une expression incomplete. 

23 Line too long (ligne trop longue) 

Le BASIC n'accepte pas les lignes de plus de 255 caracteres. 

24 EOF met (fin de fichier rencontree) 

OEF = End Of File = fin de ficbier ; le programme a effectue' une tentative de lecture apres une 
fin de fichier. 

25 File type error (erreur dans le type de fichier) 

Le fichier n'est pas du type requis. OPENiN peut seulement ouvrir des fichiers de texte ASCIL 
LOAD, RUN, etc., ne fonctionnent qu'avec des fichiers produits par SAVE. 

26 NEXT missing (NEXT manquant) 

Oo ne peut pas trouver le NEXT qui correspond a une commande FOR. Un numero de ligne 
Kcompagnant ce message indique la commande FOR * laquelle s'applique cette erreur. 

27 File already open (fichier deja ouvert) 

■Joe commande OPENIN ou OPENOUT est executee avant que le fichier dCja ouvert n'ait 6tt 
ferme. 

28 Unknown command (commande Inconnue) 

..£ BASIC oe trouve pas de references a cette commande exteme (ex: pour une commande 
Ttc6dee par J ). 

29 WEND missing (WEND manquant) 

_£ WEND mettant fin a une boucle WHILE ne peut etre trouve. 

. ■ ■ .. *«£ j. 

30 Unexpected WEND (WEND inattendu) - ! 
- WEND est decouvert en dehors d'une boucle WHILE, ou un WEND ne correspond pas au 

*H1LEde la boucle. 



31 File not open (fichier non ouvert) 

. 3tr paragraphe ci-dessous, "Erreurs de disquette".) ^ 

32 Broken in (interrompu) 

. oe paragraphe ci-dessous, "Erreurs de disquette".) 



;ou formation Chapltre 6 Page 257 



Erreurs sur dlsquettes en AMSDOS 

Plusieurs erreurs peuvent se produire lors du traitement des operations d'archivage. Bien que k 
BASIC les regroupe sous le numero d'ERReur 32, vous pouvez obtenirde plus amples infonm- 
tlons en appelant la fonction DERR. Voici la signification des valeurs qu'elle renvoie : 



Erreur AMSDOS 


ValeurDERR 


Source de Perreur 





0ou22 


Activation de [ESC]. i 


14 


142(128+14) 


Etat du canal non valable. 


15 


143 (128+15) 


Fin de fichier materielle. 


16 


144 (128+16) 


Mauvaise commande 1 


17 


145(128+17) 


Fichier deja existant. 


18 


146(128+18) 


Fichier non existant. 


19 


147(128+19) 


Catalogue saturg. J 


20 


148(128+20) 


Disquette pleine. " 


21 


149(128+21) 


Changement de la disquet.- 
avec fichiers ouverts. . 


22 


150(128+22) 


Fichier en lecture seulerne*. 1 


26 


154(128+26) 


Fin de fichier logicielle. | 



Si AMSDOS a dejarapporteune erreur, lebit7aprisla valeur 1, decalantcellede DERRde 

Les autres valeurs rapportees par DERR proviennent du controleur de la disquette, le bit 6 < 
toujours sur 1. Le bit 7 indique si AMSDOS a rapporte I'enrenr ou non (voir ci-dessus). ' 
signification de chacun des bits : 



Bit 


1 
2 
3 
4 
5 
6 
7 



Signification 

Adresse manquante. 

Ecriture impossible. Disquette protegee. 

Pas de donnee. Secteur introuvable. 

Unite non prete. Pas de disquette dans 1'unite. 

Surcharge. 

Erreur de donnee. Erreur CRC (cyclic redundancy check). 

Toujours a 1 pour indiquer une erreur venant du controleur de ( 

Sur 1 si AMSDOS a deja rapporte Terreur. 
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ERR peat envoyer 31 si vous avez tentf l'acces a une disquette sans auom ficWer ouvcrt Une 
procedure classique d'utilisation de ERR et DERR consiste a incline l'instruction ON ERROR 
GOTO afin d'appeler un sous-programme determinant la valeur (31 ou 32) de ERR puis, en cas 
d'erreur 32, utilisant DERR pour afficher la nature exacte de 1'erreur. Par exemple : 

10 ON ERROR GOTO 1000 

20 OPENOUT "monfich.asc" 

30 WRITE #9,"test de donnees" 

40 CLOSEOUT 

MEND 

1 000 amsdoserr - (DERR AND &7F):REM bft 7 force a 

1010 IF ERR <31 THEN END 

1020 IF ERR-31 THEN PRINT "etes-vous sOr d'avoir blen tape la Hgne 20 cor- 

rectement?":END 

1030 IF amsdoserr-20 THEN PRINT K ll n'y a plus de place sur la disquette. Pre- 

nez-en une autre..":END 

1040 IF amsdoserr- &X01001000 THEN PRINT "placez une disquette non 

protegee dans I'unlte, puis appuyez sur nlmporte quelle touche":WHILE IN- 

KEYfr-^WENDrRESUME 

1050 END 



■ -^».ri 



*K> 
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Partle 7 : Mots cles du BASIC (6galement appe- 
16s mots reserves) 



Void une liste des mots cI6s du BASIC AMSTRAD 6128/464. lis sontieserves et ae peuvent fitrc 
utilised comme variables. 

ABS, AFTER, AND, ASC, ATN, AUTO 

BINS, BORDER 

CALL, CAT, CHAIN, CHR$, CINT, CLEAR, CLG, CLOSEIN, CLOSEOUT, CLS, 
CONT, COPYCHR$, COS, CREAL, CURSOR 

DATA, DEC$, DEF, DEFINT, DEFREAL, DEFSTR, DEG, DELETE, DERR, Dl, 
DIM, DRAW, DRAVVR 

EDIT, El, ELSE, END, ENT, ENV, EOF, ERASE, ERL, ERR, ERROR, EVERY, 
EXP 

FILL, FIX, FN, FOR, FRAME FRE 

GOSUB, GOTO, GRAPHICS 

HEX$, HI MEM 

IF, IND, INKEY, INKEY$, INF, INPUT, INSTR, INT 

JOY 

KEY 

LEFTS, LEN, LET, LINE, LIST, LOAD, LOCATE, LOG, LOG10, LOWERS 

MASK, MAX, MEMORY, MERGE, MID$, MIN, MOD, MODE, MOVE, MOVER 

NEXT, NEW, NOT 

ON, ON BREAK, ON ERROR GOTO 0, ON SQ, OPENIN, OPENOUT, OR, ORI- 
GIN, OUT 

PAPER, PEEK, PEN, PI, PLOT, PLOJR, POKE, POS, PRINT 

RAD, RANDOMIZE, READ, RELEASE, REM, REMAIN, RENUM, RESTORE, 
RESUME, RETURN, RIGHTS, RND, ROUND, RUN 

SAVE, SGN, SIN, SOUND, SPACES, SPC, SPEED, SQ, SQR, STEP, STOP, 
STRS, STRINGS, SWAP, SYMBOL 

TAB, TAG, TAGOFF, TAN, TEST, TESTR, THEN, TIME, TO, TROFF, TRON 
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UNT, UPPERS, USING 

VAL, VPOS 

WAIT, WEND, WHILE, WIDTH, WINDOW, WRITE 

XOR.XPOS 

YPOS 

ZONE 
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Parfie 8 : Grilles 



Grille pour textes et fen&res d'&ran - MODE (20 colonnes) 
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Grille pour textes et tenure d'Scran - MODE 1 (40 colonnes) 



* ~~ i 

* _ I 

R I 

* ' I 
N * I 
X I 
II ~ _ "~ | 

B " " i 

* — ^ 

C ~ ■- - - — — — — ^ 

^ . _ - _ ^ 

* — " ' - — — ' — - ^ 

B II 

5 II 

6 E 

- 2 

9 *■ 

? ^ t 



*cssjffstt«ca8x 
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Grille pour textes et tenures d'tcran - MODE 2 (80 cotormes) 



t — _ . „ . - ' " 

* ZZZZ ZZ ZZ ZZ — zz zz zz zz zz zz zz - 

* ~^i — — — — — — — — — — — — — — — — — — * 

x ZZZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ — — — — — — — — ~ * 

b iz~izzzzzzizzzzzzzi zz zz zz zz zz zz zz — - c 

* ZZZZZZ — ZZ ZZZZZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZZZ ZZ — * 

* ZZZZ ZZ — — — — — — — — — — — — — — — — * 

* ZZZZ — — ZZZZ — ZZZZ — ZZZZZZ ZZZZZZ zz zz zz _ — - — -_ — * 
» ZZZZ ZI — ZZZZZZZZ — ZZZZZZZZ ZZ ZZZZ ZZ ZZ ZZ ZZ • 8 

* ZZ ZZ ZZ ZZ ZI ZZ ZZ ZZ ZZ ZZ ZI ZZ ZZ ZZ ZZ ZZ ZZ — ■ 

t ZZ ZZ ZZ ZZ ZI ZZ ZZ ZZ ZZ ZZ ZI ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ — ZZ _ « 

« ~ ZZ ZZ ZZ ZZ ZI ZZ ZI ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ . * 

i ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ — . * 

a ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ 8 

t ZI ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ — * 

» "ZZ ZZ ZI ZZ ZZ ZI ZZ ZZ ZZ ZZ ZZ ZZ _ ZZ * 

* ZZIZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ __ — , . * 

* ZZ ZZ — ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ * 

8 ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZI ZZ ZZ ZZ ZZ ZZ , "ZZZZZZZZ * 

« ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ * 

■ ZZ ZZ ZI ZZ ZZ ZZ ZZ ZZ ZZ — * 

» ZI ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ — — * 

x ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ — * 

a ZIZZZZZZZZ ZZZZZZZZZZZZ ZZ . — 8 

* ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ . . , * 

* ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ _ * 

it ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ — ZZ _ — * 

x ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZI ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ . ' 

u ==zzzzzzzzzizizzizzzzzzzzzzzzzzzizzizziz^zz_ : zr b 
r = = = === = == = = = = = = = 3EzzzzEzzzzzzzz s 

j — — — — — — — zz ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ zzzz * 

. ■ ■ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZZ ZI * 

• ^^ _ __ ^__ _.. ___. ,._ _,.. __ » __ _-^- _. — 1 _ — — — . — -— — 



= = je* = sessoB % n 
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Partie 9 : Connexions 



Entrees/Sorties du 0128/464 

Joystick 1 Cartouche 30*.,**, 



'(MZ 



^ 





iZ. 



AUX Joyrtck2 

Anatogiqu* 



2ndtec*«ur SVDC Eorwi Extension tmprimai* 




Prise Auxlllalre 




Brochel 
Brochs2 

Broch»3 



+5V 
COMMUN 

LPEN 



Broche4 
BrocheS 
Broch«6 



FEU 2 
FEU1 

GND 



Prise demanettedejeu 





( ' ' 


3 4 9 


h 






* 


[:: 


• • 
» 9 
















BROCHE1 
BROCHE2 
BROCHE3 

BROCHE4 
BROCHE5 


HAUT 
BAS 

GAUCHE 

DROITE 

RESERVE 


8ROCHE6 
BROCHE7 
BROCHE8 
BROCHE9 


FEU2T1R 
FEU 1 TIR 
COMMUN 
COM2 
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-fci 



Prise monlteur 




6 7 

3 • t 

5 2< 



BROCHE1 


SYNC 


BROCHES 


Bl£U 


BROCHE2 


VERT 


BROCHES 


VOIEQAUCHE 


BROCHES 


LUM 


BROOHE7 


VOIEDROfTE 


BROCHE4 


ROUGE 


BROCHE 8 


MASSE 



Prise sterGo 



Droit 




A. 



Gauche 
Droit 



■Masse 



Masse Gauche 



, • s 


*'.«.sr.e. ... 


BROCHE1 
BROCHE2 
BROCHES 


CANAL GAUCHE 
CANAL DROIT 
MASSE 



Prise analoglque 



BROCHE1 


MASSE 


8ROCH69 MASSE 


BROCHE 2 


TIR1 


BROCHE 10 T1R1 


BROCHE3 


X1 


BROCHE 11 X2 


BR0CHE4 


COMt(COMMUTATEURS) 


BROCHE 12 COMI(COMMLrTATEURS) 


BROCHES 


+6V 


BROCHE 13 Y2 


BROCHES 


Y1 


BROCHE 14 TIR2 


BROCHE 7 


T1R2 


BROCHE 15 MASSE 


BROCHE 8 


MASSE 





z 



• r • i * ■ i i 



* w a a « ■> • 



V 
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Prise d'extenslon 



V 



roo-cn^otrtrtro-crcrcraotrao-cro 



tra-a-oa-tri 



— . --■ — ■ ' —^ • • 



J 



PIN1 
PIN 2 
PIN 3 
PIN 4 
PIN 5 
PIN 6 
PIN 7 
PIN 8 
PIN 9 
PIN 10 
PIN 11 
PIN 12 
PIN 13 
PIN 14 
PIN 15 
PIN 16 
PIN 17 



SOUND 

GND 

A15 

A14 

A13 

A12 

A11 

A10 

A9 

AS 

A7 

A6 

A5 

A4 

A3 

A2 

A1 



PIN 18 
PIN 19 
PIN 20 
PIN 21 

PIN 22 
PIN 23 
PIN 24 
PIN 25 
RN26 
PIN 27 
PIN 28 
PIN 29 
PIN 30 
PIN 31 
PIN 32 
RN33 
PIN 34 



A0 


PIN 35 


D7 


PIN 36 


D6 


PIN 37 


05 


PIN 38 


D4 


PIN 39 


D3 


PIN 40 


D2 


PIN41 


D1 


PIN 42 


DO 


PIN 43 


+ 5v 


PIN 44 


MREO. 


PIN 45 


m 


PIN 46 


RF5R 


PIN47 


IORO 


PIN 48 


m 


PIN 49 


Wff 


PUIN50 


HALT 





Iff 

BUSR2 

BU3SR" 

READY 

50STJE 5ET 

RESET 

ROMEN 

ROMDIS 

RAMRD 

RAMDIS 

CURSO R 

L PEN 

EXP 

GND 



Prise de I'unite de disquette 2 (6128 uniquement) 



v 



rtrtrotraot^o^roiTiitJ-CTtmtKri 



jocui^cu3-a-c v ixoa-o-o-o-arM3o- 



HMJJIO 



P1N1 




PIN 2 


GND 


PIN 3 




PIN 4 


GND 


PIN 5 




PIN 6 


GND 


PIN 7 


INDEX 


PINS 


GND 


PIN 9 




PIN 10 


GND 


PIN 11 


DRIVE 1 SELECT 


PIN 12 


GND 


PIN 13 




PIN 14 


GND 


PIN 15 


MOTOR ON 


PIN 16 


GND 


PIN 17 


DIRECTION SELECT 


PIN 18 


GND 


PIN 19 


STEP 


PIN 20 


GND 


PIN 21 


WRITE DATA 


PIN 22 


GND 


PIN 23 


WRITE GATE 


PIN 24 


GND 


PIN 25 


TRACK 


PIN 26 


GND 


PIN 27 


WRITE PROTECT 


PIN 28 


GND 


PIN 29 


READ DATA 


PIN 30 


GND 


PIN 31 


SIDE 1 SELECT 


PIN 32 


GND 


PIN 33 


READY 


PIN 34 


GND 


PIN 35 
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Port pour Imprlmante 



tow. 



n « w to 



4 a t i 



? 



S 



29 M » 22 



CT « « « 



P1N1 


STROBE 


PIN 17 


GND 


PIN 2 


DO 


PIN 18 


QND 


PIN 2 


D1 


PIN 19 


QNO 


PIN 4 


02 


PIN 20 


GND 


PIN 8 


03 


PIN 21 


QND 


PIN e 


04 


PIN22 


QND 


PIN 7 


D5 


PtN23 


GND 


PIN 8 


w 


PIN 24 


QND 


PIN 9 


07 


PIN 25 


QND 


PIN 11 


BUSY 






PIN 18 


4«V 


AutTMbroctmiNC 





Partie 10 : Imprimante 



lnterfa$age 

jz 6128/464 peut etrc connects a une imprimante standard compatible Centronics. 

u cable de rimprimante est une simple connexion entre la prise PRINTER situee a l'aniere de 
ordinateur et le connecteur de 1 'imprimante parallele. 

_a partie 9 de ce chapitre illustre en detail la configuration des broches. 
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La synchronisation dc l'ordinateiir a rimprimaote s'effectue par l'inteim6diaire du signal BUSY 
(broche 1 1). Si l'imprimante n'est pas en fonction, l'ordinateur reste en attente. 

On obtient la sortie sur rirnprimante en envoyant les donnees sur Ie canal #8. 

Bien que le port d'impression du 6128/464 soit concu pour recevoir un modele d'imprimante 
matricielle bon marcne\ nanti d'une interface parallele standard, il vous sera toutefois possible de 
doter votre ordinateur d'une imprimante a marguerite, d'une table trafante ou d'une imprimante 
polychrome a jet d'encre. La cl£ de la compatibilite est rimprimante parallele standard. 

Configuration de rimprimante 

Un disposraf permet rimpression des caracteres speciaux affichabtes 4 Y6aan et acceptes par 
rimprimante, en depit de la difference du code utUis6 dans 1'un et 1'autre cas. La plupart de ces 
caracteres ne peuvent etre obtenus que dans 1'un des modes d'impression interaationaux de 

rimprimante. 

Ainsi: 

PRINT CHR$(&AO) 

A 

print #8,CHR$(&A0) 

A 

. . .on obtient A sur rimprimante (alors qoe snr rimprimante, l'accent circonflexe est cod6 &5B). 
En d'autres termes, le programme d'impression identifie &A0 comme un code faisant partie de 
sa table de conversion et lui substitue &5E, afin que le caractere imprimd corresponde bien a celui 
qu'affiche l'6cran. Quel que soit le mode linguistique choisi, le code &5E correspond toujours a 
1 'accent circonflexe de rimprimante, ce qui n 'est pas le cas pour tous les caracteres contenus dans 
la table de conversion. Voici les autres caracteres que contient la table de conversion : 



emu 


Caracttre 

al'tosn 


Trantcodage 
hnprinante 


6B 


USA 


France 


ABonpe 


EipagM 


&A0 


A 


&5E 


A 


A 


A . 


A 


A 


AA2 


.. 


&7B 


t 


t 


t 




•• 


&A3 


£ 


A23 


£ 


# 


* 




Pt 


&A6 


5 


&40 


t 


t 


t 




t 


AAE 


i 


&SD 


t 


t 


t 




I 


AAF 


i 


ASB 


t 


t 


t 




I 



t Pour le caracttre imprime, se reporter a la page 18 du manuel destruction de la DMPL 

La liste ci-dessus est extraite de la table des conversions par deTaut Pour les redefinir, consulter 
un manuel de microprogrammation. 
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Partie 11 : Les manettes de jeu 



Le systems d'exploftatioo do 6128/464 prfvoit l'otfliMtion d'une ou de oeux manettes de jftfc An 
mfime titre que les touches du clavier, ces manettes peuveot fttre interrogees au moyen des 
instructions INKEY et I NKEY$. Le bouton de commande principal de votre manette conespond 
le plus souventa"Fire2 H . II est possibled'interrogerdirectementla premiere et la seconde manette 
a Taide des fonctions JOY(0) et JOY(1 ). La fonction JOY renvoie un nombre dont la signification 
n'apparaft qu'en binaire, indiquant V6taX des interrapteurs des manettes de jeu lore de la derniere 
interrogation du clavier. 

Le tableau ci-dessous donne les valeurs transmises par les deux manettes. Dans la partie gauche 
figurent les valeurs obtenues par la fonction JOY et, dans la partie droite, celles a utiliser dans 
des expressions prenant les codes du clavier comme parametres (fonctions I N KEY et KEY DEF). 



MANOEUVRE 


FONCTION JOY 


VALEURS •CLAVrER" 


Haul 


BIT 


VALBUR 
RENVOYEE 


PREMIERE 

MANETTE 


SECONDE 

MANBTTE 


TOUCHE 
CORRESP. 





1 


72 


48 


6 


Bm 


1 


2 


73 


49 


5 


Owxhe 


2 


4 


74 


SO 


Mt« 


Droite 


3 


S 


75 


51 


T 


Tir2 


4 


16 


76 


52 





tsti 


5 


*32 


77 


53 


F 



Vous constatez que rordinateur assimile les vatenre renvoyees par la seconde manette a celles 
provenant des touches correspondantes du clavier (derniere colonne du tableau), n est done 
possible d'utiliser le clavier comme deuxieme manette de jeu. 
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Partie 12 : Les formats de disquettes 



Le BIOS prcnd en charge deux formats de disquettes differents : les formats SYSTEM et DATA 
ONLY. Lorsqu'un systeme fonctionnant sous AMSDOS accede a une disquette ne comportant 
aucun fichier ouvert, il en detecte automatiquement le format. Chaque format est dote a cette fin 
d'une numerotation de secteurs specifique. 

Bien que les disquettes "3 pouces" soient a double face, seule la face superieure est accessible par 
runitfi. Les deux faces peuvent etre de format different 

Caracteristiques communes & tous les formats 

Simple face (les deux faces d'une disquette "3 pouces" dtantenregistrees separement). Taille d'un 

secteur physique : 

512 octets. . . 

40 pistes nunterotees de a 39. 

Taille du bloc CPM : 1024 octets. 

Repertoire : 64 entrees. 

Le format SYSTEM :...■*;' 

9 secteurs par piste, numerotes de &41 a &49. 
2 pistes reservees. 

Lechargementdu CP/Mn'etant possible qu'apartird'une disquette de format systeme, ce dernier 
est done le plus commun. 

amorcageCP/MPlus 



Piste secteur &41 
Piste secteur &42 a &49 



Piste 1 secteurs &41 a &49 



inutilis6s 



n existe une version du format systeme dans laquelle les pistes reservees ne contiennent aucun 
logiciel : le format VENDOR, destine a la distribution des logiciels d'application. 

Le format DATA ONLY 

9 secteurs par piste, numerates de &C1 a &C9. 
Aucune piste reservee. 
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Partie 13 : Extensions residentes du systeme 
(RSX) 



Nous avons evoque" les cofflmandes extemes au chapitre 5 (a propos de TAMSDOS). Une 
commande exterae sert a eTargir le repertoire du BASIC en lui ajoutant de nouvelles commandes 
indiquees par le preTixe |. Les instructions machine des nouvelles commandes AMSDOS resident 
en memoire ROM (memoire morte) et la procedure d'adjonction des commandes est assuree 
automatiquement d&s que le 6128/464 demarre en BASIC. 

n est egalement possible d'ajouterd'autres commandes (apres lancementdu BASIC) en chargeant 
les instructions machine en memoire RAM (memoire vive). Ces nouvelles commandes sont 
appelees RSX (extensions residentes) et fonctionnentexactementcomme les extensions stockees 
dans la ROM. Les extensions residentes doivent etre ebargees a partir de la disquette (ou de la 
cassette) a ehaque initialisation ou reinitialisation du 6 128/464 en BASIC. Hies servent habituel- 
tanent a commander des penphenques intelligents tels que des crayons optiques ou des synthe- 
tiseurs de parole. 

Le chapitre 7 decrit l'utilisation des extensions readentes RSX pour acc6der au second bloc des 
64 Ko de memoire. 



ia*MSfc 



,t m r r •?• 
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Partie 14 : La memoire 



Le 6128 possede une meinoire RAM de 128 Ko et uiie ROM DE 48 Ko. La ROM de la cartouche 
cootient 16K pour le BASIC , 16K pour la gestiongenerale (general fiimware), 16Kpourlagestion 
disque (disc firmware), 64K pour un jeu et 16K de reserve. L'ensemble de cette memoire est 
accessible au BASIC 1.1 comme montre" ci-dessous. Le 464 se differe par ses 64K de RAM, 
cependant la gestion du disque est automatiquemeot ineffective. Les 64 premiers Koctets de la 
RAM sont divises en 4 blocs de 16K chacun numerates Bloc a Bloc 3. L'ecran exploite le Bloc 
3. La partie supeiieure du bloc 2 contient les variables systeme. 



•.Oc. 



*-oc 



*<*! 



«*c 




"°M 



°^-r 



464&6128 



6128 seutement 



464&6128 



484&8128 



Topographte de la memoire pour le BASIC 1 .1 



Au depart, les caracteres d€finis par 1 ' utilisateur se trouvent imrnddiatement au-<lessus de la limite 
HIMEM, mais celle-ci peut etre modifiee par une commande MEMORY et elle est automat- 
iquement abaissee de 4 Ko tors de rouverture de fichiers AMSDOS pour creation d 'une memoire 
tampon. Le nombre de caracteres definis par l'utilisateur ue peut etre modifid que si aucun 
cbangement du jeu de caracteres n'est intervenu depuis sa determination prec6dente (a moins 
qu'une commande SYMBOL AFTER 256 n'ait fixe "pas de caracteres ddfinis par l'utilisateur"). 
Lots du lancement du BASIC, les caracteres ddfinis par l'utilisateur sont fixds comme si une 
commande SYMBOL AFTER 240 avait £t£ envoyee. 
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n est done prudent de Hbftrer la zone des caracteres d6finis par l'utilisateur avant de modifier 
HIMEM deTinitivement, puis de restaurer cette zone dans sa nouvelle position. Les programmes 
suivants pourront ainsi modifier P affectation faite par la commande SYMBOL AFTER. 

L'exemple ci-dessous illustre cette facon de procetter lorsque HIMEM est abaissee par le 
cnargementd'extensions residentes RSX. 

100 SYMBOL AFTER 256 ' annute les caracteres definis par l'utilisateur 

1 1 rexaddress-HI MEM-rsxiength 

120 MEMORY rsxaddress-1 

130 LOAD H rsxcode",rsxadclres8 

140 CALL rsxaddress 

150 SYMBOL AFTER 1 40 YetaWtt les caracteres ddfirris par l'utilisateur 





Zona ataom tm iaSK 

Zt*» <M 4o»*M ROM «w* 

Zor* »• limM o— nous ft tm mi m 



'apufwphte de la memoire avec RSX a l'emplacement recommande' 
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EnfrGes/Sortles supptementalres 

Les adrcsses des ports d'Entree/Sortie sont, pour la plupart, reservees par rordinateur. Les adresses 
infeneures a &7FFF, notamment, sont absolument prohibees. 

Les lignes d'adresses AO a A? seront affectees a la designation du type de periphenque I/O et les 
adresses des Ugnes A8 et A9 peuventetre decodees pour selectioiwer les registres du penpherique 
I/O. Parmi les lignes restantes, seule A 10 doit etre decodee (6tat bas) alors que les lignes All 
jusqu'a A15 doivent etre a l'6tat nauL Aux registres de chaque peripbenque seront ainsi affectees 
des adresses du type &F8??, &F9??, &FA?? et &FB??, ou les deux demiers symboles ddsigneront 
soit une interface de communication (de DC a DP) soit tout autre type de pfiripbirique (de EO a 
FE). 

On utilisera les instructions Z80 recopiant le registre B dans la moitte sup6rieure du bus d'adresses 
(A15aA8). 

ROMs auxiiiaires 

n est possible d'adresser des ROMs auxiiiaires en plus de la ROM interne. Le contrOle d'adressage 
et la logique de bankswitcning seront contenus dans un module connecte' au bus d'extension, bien 
que tous les signaux requis soient amenes sur le bus d'extension. 
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Partie 15 : L'emulateur de terminaux du CP/M 
Plus 



Dais la premiere partie de ce chapitre figure un tableau de caracteres de controle (avec leur 
fboction). Ces actions interviennent lorsque le texte est envoye" a l'ecran en BASIC. Elles ont 6te" 
cnoisies pour etre a la fois simples d'utilisation et pour refl£ter les possibility offertes par le 
VDU (Video Display Unit). Elles sont propres aux ordinateurs AMSTRAD et les logiciels doivent 
done fitre adaptes pour lew utilisation. 

Afin de permettre la portabilite' du logiciel CP/M Plus d'un ordinateur a l'autre pour un environ- 
nement commercial, il est normal de doter celui-ci d'une diversity de fonctions de traitement de 
texte standard. L'imple'mentation du CP/M Plus sur 6128 integre un emulateur de terminaux 
diiposant de fonctions tres simuaires k celles d'un terminal zenith Z19/Z29. La procedure 
d'installation du logiciel CP/M Plus comprend generalement une option standard pour ce type de 
trminaux. 

Les fonctions de l'emulateur de terminaux du CP/M Plus couvrent une grande partie de celles du 
VDU ; il faut noter toutefois que les codes de contrOle sont alors differents. 

Les caracteres compris entre &20 et &FF sont affiche's a la position courante du curseur. Si le 
curseur n'est pas dans la deraiere colonne de l'ecran, il se deplace d'une colonne vers la droite. 
S'il se trouve dans cette colonne et que la fonction de retour automatique a la ligne est activfe, il 
se place a gauche de la ligne suivante, en faisant remonter le texte affiche" si necessaire. 



<jn.fi> 



Pour irrformatlon Chapttre 6 Page 277 



I^caracteres&controle^ 

407 BEL Signal sonore. 

« ~» .««*«. TVniari* 1e curseuT d'une colonne vers la gauche. Si le 

&08BS S^v^pa^^^ 

SSTTSSSn de retoWauUtique * la ligne eit acuvee, u se place 
sur la demiere colonne de la ligne supeneure. 

iOALF Saut dehgne.Faitck^^ 

si ndcessaire. 
40D CR RetourcharioLPlacelecur^^ 

&1B ESC Introduit une sequence de changement de mode. 

Tous les autres codes de controle sont ignored. 

pas le caractere qui lui conespond. 

PESC10 Desactive la Ugne d'etat Les messages systems sont visuaUses par une 

sortie ecran ordinaire. 
rPSCll Active la Ugne d'etat Les messages systtme appanrissent ators sor la 

1 ligne inferieure de l'ecran. 

rESCE** Change le jeu de caracteres (voir partie 16 de ce ^ *?«£^ 

[ESC]2<n> « tle ^arnfetredelalangue^^^ 

rnaSSdecaracteres comprises entre &20 et &7F sont «npta*espjr 
StSc^c^cornprilentre &80 et &FF. Cette commande agrt de 

dant des jeux de caracteres ddfinissables par logiciel. 



<n> = 0Etats-Unis 
<n> = 1 France 
<n> « 2 Allemagne 
<n> «* 3 Royaume-Uni 
<Q>»4Danemark 
<n> - 5 Suede 
<n> - 6 Italie 
<n>-7 



igWre. L'6cran s'efface mais le curseur ne change pas de place. 
[ESC]A Enlace le curseur vers le haut sauf s'il se trouve sur la premiere Ugne 

[ESC1B Deplace le curseur vers le bas sauf s'il se trouve sur la demiere Ugne. 
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|ESG|C D6place lc curseur vers la droite sauf s*il se trouve sur la (tenure 

colonne. 

pSC]D Deplace le curseur vers la gauche sauf s'il se trouve sur la premiere 

colonne. 

|E8C]E Efface la page. Le curseur ne change pas de place. Cette commande 

efface la totalite de l'ecran, meme en mode 24 x 80. (les autres codes 
ESC n'affectent que la zone 24 x 80 lorsque le mode 24 x 80 est 

selectionn6.) 

|ESCJH Deplace le curseur jusqu 'a la premiere colonne de la premiere ligne. 

[ESCJI Deplace le curseur d'une ligne vers le haut, en faisant descendre le texte 

si necessaire. 

[ESCJJ Efface le texte jusqu'a la fin de la page, caractere sous le curseur compris. 

Le curseur ne change pas de place. 

(ESCJK Efface le texte jusqu'a la fin de la ligne, y compris le caractere situe" sous 

le curseur. Le curseur ne change pas de place. 

JESCJL Insere une Ugne. Toutes les lignes situees sous la ligne du curseur, 

celle-ci comprise, desceodenL La ligne se situant a la position du curseur 
est alors vide. La position du curseur ne change pas. 

[ESCJM Supprime une ligne. Toutes les lignes situees sous la ligne du curseur, 

celle-ci comprise, remontent La ligne du bas de l'ecran est alors vide. 
La position du curseur ne change pas. 

[ESCJN Supprime un caractere. Tous les caracteres situes a droite du curseur se 

deplacentd'une colonne vers la gauche, laissant un espace en fin de ligne. 
La position du curseur ne change pas. 

(ESCJY ^ <e> D6place le curseur jusqu'a la position indiquee. Si celle-ci se trouve a 

l'exterieur de Tecran, le curseur se place au bord de l'ecran. <1> = ligne 
+ &20 et <o - colonne + &20. L'angle sup6rieur gauche de l'ecran 
correspond a la ligne 0, colonne 0. 

[ESCJb^JO D6finitlacouleurdu texte etaffecte tous les caracteres de l'ecran. <pc> 

est le parametre de la couteur, masqu6 par le code &3F et traite" ensuite 
comme trois nombres de 2 bits, indiquant chacun rintensite" d'une des 
trois couleurs primaires : bits 0,1 pour le bleu, bits 1,2 pour le rouge et 
bits 3,4 pour le vert Le 6128/464 permet trois intensites representees en 
binaire comme suit : 



646/6128 


Intensite zero 


Demi-intensitt 


Pleine intensite' 


Bits de couteur 


00 


01 ou 10 


11 
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rESClc<DO Deflratlaoouleiir<tefi»iidderfcm.Ato«toatte«^etiabo^ 

1 ^ de l'ecran. Les couleurs sont specifiees comme 1'indique le tableau 

ci-dessus. 
fgSCjd Efface le texte jusqu'au debut de la page, y compris le caractere sitae" 

sous le curseur. La position du curseur ne change pas. 

[ESCte Active la presence du curseur pour un meilleur confort visuel. Le curseur 

reapparalt 1/10 seconde apres 1'affichage du dernier caractere entre. 

[ESCJf Desactive la presence du curseur. 

p=sci] Sauvegarde la position du curseur. 

[Escik Restitue la position du curseur sauvegardee par [ESC]J. 

[ E SC]| Efface la ligne. La position du curseur ne change pas. 

n=scio Efface les caracteres jusqu'au debut de la ligne, y compris celui qui se 

trouve sous le curseur. La position du curseur ne change pas. 

prsC]p Etablit le mode video inverse. Les couleurs de fond et de texte des 

caracteres imprimables sont inversees. 

[ESC]q Sort du mode video inverse. 

rESCJv Le curseur passe en fin de ligne. 

[ESCJw Supprime les caracteres jusqu'a la fin de la ligne. 

rESClx EtabUt le mode 24 x 80. Pour certains programmes d' application, un 

ecran standard 24 x 80 est necessaire. Cette commande active ce mode 
sans teoir compte de la taille de 1' ecran, qui depend de rordinateur, du 
pays d'utilisation et de l'activation de la ligne d'etat Le contenu de 
l'ecran s'efface. 

[ESCly Desactive le mode 24 x 80. Le contenu de l'ecran s'efface. 



•csiv 
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Pour information 



Partie 16 : Le jeu de caracteres du CP/M Plus 



Dans la partie 10 de ce chapitre figure une table de conversion des caracteres du BASIC sous une 
forme conespondant a la langue s€Iectionnee par rimprimante. Cette possibilitd de transcodage 
est cependant limitee, car le jeu de caracteres du BASIC comprend tres peu de caracteres Strangers 
par rapport aux imprimantes. 

Cette conversion fonctionne egalement sous CP/M Plus mais le jeu de caracteres a ete ameliore 
pour permettre une correspondance quasi totale entre caracteres afficbes et caracteres imprimes 
(le seul symbole manquant a l'ecran est le symbole mon6taire su6dois remplacant le $). La table 
ci-dessous montre cette correspondance. 



23 24 40 5B 5C 50 5E 60 7B 7C 7D 7E 



USA 

France 

German/ 

UK 

Denmart 

Sweden 

ttaty 

Spain 



III 

£1 



1 



iiii 
dili 



liisi 



Issa 



1 



m 



iliiii 



i 

s 



& 






Jeu de caracteres international du CP/M Plus 
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Void la marche a sirivre pour exploiter l'ordinateur dans une langue autre que l'americain : 

1 . Seiectionner sur 1' imprimante la langue desiree (le plus souveut a 1' aide de rmcro-in- 
terrupteurs DIP ; certaines imprimantes acceptent cependant les codes de controle). 

2, seiectionner lejeude caracteres eCTaocc*respon<ia^^ 

LANGUAGE <n> 

ou par envoi du code 
[ESC]2<n> 

a Pemulateurde terminaux. 

En pratique, cette initialisation peut s'effectuer dans le cadre de la procedure PROFILE.SUB, a 
I'aide des fonctions LANGUAGE et SETLST. A l'expedition, le CP/M Plus est configure en 
version americaine, essentieUement parce que le clavier dispose du signe # sur la touche 3. Le 
clavier americain est tres souvent utilise pour le traitement delexte. 

Logiciel 7 bits... 

Bien que tres puissante, cette fonction, qui remplace les caracteres "normaux" (amencains) par 
ceux de la langue choisie, ne permet plus d'afficher ces caracteres. II s'agit la d'un alea courant 
et inevitable des logiciels a 7 bits. Presque tous les logiciels (meme les utilitaires du CP/M Plus, 
les traitements de texte) operent sur un jeu de caracteres a 7 bits seulemenL Pour le Royaume-Uni, 
la disparition du signe # au profit du symbole monetaire £ est plutOt bien acceptee, surtout en 
traitement de texte ; quant au listagedes programmes, UST£ 8, par exemple, l'utilisateur s'babitue 
a faire la conversion mentalement 

Malheureusement, pour les autres langues, certains caracteres remplacent la bane verticale et les 
crochets. C'est bien sQr plus pratique pour la lisibilite des caracteres accentu6s, mais pour les 
programines d'appbcatioD necessitant ces signes, D1R [ALL], par exemple, la commodite de 
lecture et de frappe (si les touches sont modifiees) s'en trouve nettement reduite. N'oubUez pas 
que les programmes travailleot en valeur A5QI, qui se soucient peu des caracteres afficnes a 
recran. Le probleme est qu'avec un logiciel a 7 bits, celles-ci ne sont pas assez nombreuses. 
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Exploitation du systfcme avcc dcs jeox de caractferes a 8 bits 

Le ieu de caracteres BASIC possede 256 symboles differents ; les valeurs 128 a 255 (&80 k &FF) 
corespondent aux differents symbotea grarAiques pour tes jeux et les applications ^uxkviduelles 
(peraonnagea, cur/caneau/pique/trefle, etc.) Le CP/M Plus possede egalement 256 caracteres, 
mais les 128 derniers different de ceux du BASIC : Us apportent a l'environnement du CP/M Plus 
une tooche a caractere international et professionnel. 



01234S678MBCDEF 1 23 4567 8« A B CO £ F 



01234S6783! ;<=>? b H^?3t , « 5 » 5 « J * eet ^^ 

babVdefghijklhno c *e*oo«Gieo*e*oo¥ 

PQRSTUUMXVZtMt. »ESt»li?I*BSS8>^ a 

'abcdefghijklNno e ieS6ui«f SGaiioOy 

pqrstuvuxyz{l)"0 f Selibu5iaBnS8«»*#S 



Caracteresde0al27(&00a&7f) Caracteres 126a255(&80a&FF) 

Jeu de caracteres standard du CP/M Plus 



Les logiciels fonctionnant avec des caracteres de 8 bits peuvent exploiter ce jeu de caracteres pour 
tracer des cases, cornrne fe montre la figure ci-dessus, mais aussi pour acc£der directement a toutes 
les langues sans iMxHflcation specifique de clavier. Les caracteres tels que les banes verticales et 
ks crochets soot egalement disponibles. 

Les logiciels a 8 bits sont encore ties rares etles caracteres a 31 et 128 a 255 n'apparattront que 
ranment a l'dcran tels qu'ils figurent ci-dessus. Les urnjrimarrtes, par contre, restitueront ces 
symboles plus fidelement 
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Chapitre 7 

Complement d'information sur 
BANK MANAGER 



Les extensions du BASIC permettent d'acc6der au second bloc des 64 KO de RAM. Ce chapitre 
coDceme le 6128 umquemeut 

Sujets abord& : 

ft Stockage des images ecran 

ft Fonctionnement des fichiers virtuels 



Comme Findique la topographie de la mernoire du BASIC 1.1 (representee a la partie 14 du 
chapitre 6), sur les 128Ko de RAM, 64Ko restent inutilises. Le BASIC etles programmes systeme 
resident dans la ROM qui, ajoutee a la ROM disquette, etend la memoire de 64Ko a 1 12 Ko (64Ko 
deRAM,48KodeROM). 

Chaque lot de 16Ko s'appelle un "bloc" et quatre blocs (soit 64Ko) forment un banc. C'est 
pourquoi la technique de selection des blocs se nomme 'thangementde bancs". 

Le microprocesseur Z80 ne peut gdrer que 64 Ko a la fois,. aussi le systeme d'exploitation 
contient-il des instructions qui sollicitent la ROM des microprograrnines, plutot que le bloc de 
la RAM, et la ROM du BASIC ou de la disquette, plutot que le bloc 3. Ce changement de blocs 
intervient automatiquement lorsque le BASIC ou les mi cr opro gr ammes sont requis. Ce precede 
est egalement applique a la RAM pour favoriser le recouvrement de la RAM plutot que celui de 
la ROM. Le changement est assure' par un programme redige en assembleur. 

Le programme BANKMAN.BAS reside sur la face 1 d'une des disquettes systeme. S'il est 
execute apres lancement du BASIC, il instaure le code RSX de gestion de blocs, d'oo son 
appellation de "gestionnaire de blocs". 

La deuxieme partie des 64Ko de memoire sett notamment d'espace provisoire de stockage des 
ecrans graphiques. Elle permettra par exemple de stocker un programme de dessin tel que "Salut 
rartiste" possedant plusieurs ecrans differents, ou un jeu video comportant plusieurs Ecrans deja 
prftts. 

Cette partie de la mernoire permet aussi d'etendre respace de travail des variables, qui peut etre 
consider^ comme une extension de respace reserve aux chatnes, ou tout simplement comme un 
disque virtue! (sur RAM). 
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Partie 1 : Stockage des images d'6cran 



Cholsissezvotre6cran. 



RANK MANAGER peut mettre le bloc 1 dc c6« et saectionner ft sa place run des quatre blocs 

oue cnaoue bloc 1 (probablement le bloc central de votre programme en BASIC) est preserve et 
SuSquTB /Sx MANAGER a termiud. D existe trois autoes ■*^J^j£ to 
(outre les dnq representee? ci-dessous) mais eiles ne servent qu'ft implementer le CP/M Plus. 





-""( 


^<»ri7>] 


f c«^7^l 


^c^p^| 


****7>i 


— — *°c« 


~~~^OC7 




— ~~-*£cs 


""> 




-^oc. 


'-" 







Changement materiel de bancs 

BAr^KiANAGERgeredeiixcomniandesa^^ 
4 ft 7 sont seiectionnes selon les besoins. 
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La commande : 

|SCREENSWAP,[<zone ecran>,] <3niroero d'6cran>,<num^ro d*ecran> 

. . .imerverttt le contenu des deux blocs. 

. '"WW* - '-' 

La commande : 

|SCREENC0PY,[<2one 6cran>,] <nura6ro d'ecran dble>,<numero d'ecran 
source> 

. . .copie le contenu d'un bloc dans un autre bloc. 

Le parametre facultatif <zone ecran> provoque la copie d'1/64 du Woe (soit256 octets des 16Ko). 
D peut varier de a 63. Ce mode pennet d 'effectuer une autre tSche entredeux operations de copie. 
L'ecbange de contenus d'ecrans dure environ 150/300 secondes (soit 150 unites TIME). 

Le premier <numero d'ecran> doit etre 1 (ecran normal) et le second peut prendre les valeurs 2, 
3, 4 ou 5. Les copies ou exnanges d'ecrans faisant intervenir 1 'ecran 1 comme cible ou comme 
source sont Wen pins rapides. Comme pour la copie d'ecran sur disquette, il convient de veiller 
so defilement d'ecran gendre par le materiel, n faut pour cela construire et visualiser toutes les 
knages ecran avec la meme position matenelle que celle de recran 1 , le plus simple 6tant de faire 
appel a la commande MODE. 

Pratique des commandes de changement d'ecrans 

Commencez par lancer le programme BANK MANAGER a partir de la face 1 d'une des disquettes 
systeme: 

RUN "BANKMAKT 
Tapez ensuite : 

MODE1 

Le contenu de Tehran s'effiace. Tapez alors : 

'Ceci est l'ecran original 

|SCREENCOPY,3,1 'Stocke recran original en memoire 3 

CLS 

Le contenu de l'ecran s'efrace de nouvcau. Tapez : 

'Ceci est l'ecran intermediaire 

|SCREENCOPY,2,1 ' Envoie l'ecran intermediaire en mem 2 
]SCREENSWAP,2,2 ' Echange la m6moire 2 et la memoire 3 
|SCREENCOPY,1 ,3 ' Fait venir a l'ecran la memoire 3 
|SCREENC0PY,1 ,2 ' Fait venir a l'ecran la memoire 2 

Pour teiminer, la derniere partie du chapitre 9 comprend un programme complet "Salut 1 'artiste", 
qui met en jeu les foncttons de changement d'ecrans de BANK MANAGER. 
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Partie 2 : Fonctionnement des fichiers virtuels 



Encore ces maudits fichiers... 

Priscommedisqueviitae^ 

felounxur fixe, constitnant un fichier virtuel (de memoire RAM). Cette longueur doit etxe 

de^aque emegistrement virtuel, vous pourrez y acceder grace a son nun* o Rien ne vous 

empecbe d'ecrire le fichier virtuel avec telle ou telle longueur d'enregistrement, et de le lire avec 

une longueur differente. 

REMARQUE : Ce fichier virtuel ne peut contenir que des donnees. En effet, rien n'est pr6vu pour 

qu'il puisse contenir des instructions de programmes executables. 

Comme pour les fichier, a acces s61ectif, ce fichier virtuel reprend la notion ^™f*°J£^ 

rement utile pour les recherches a l'interieur du fichier. 

La cornmande : 

|BANKOPEN,<longueur d'enregistrement virtuel> 

„ . fixe la longueur de tous les enregistrements, ainsi que la valeur zero pour l'enregistrement 
courant, mais N'EFFACE PAS le contenu de la memoire. 

La commande : 

|BANKWRrTE,@ <code retour>^chalne alphamim£rique> [,<numero 
d'enregistrement virtuel>] 

.ecrit la <chatoe alphanumeriquo dans le fichier virtuel. 
Le <numero d'enregistrement virtuel> definit 1' enregistrement en cours d'ecriture. S'il est onus, 
ce parametre est remplace par le numero d'enregistrement courant Le pointeur d enregistrement 
passe ensuite a renregistrement suivant 

Sila<chalnealpr^i>rr*r^ 

(non ecrases) restent en fin d'enregistrement Si la chalne est plus tongue que If^ 1 ?™**; 
les caracteres excedents sont supprimes pour eviter lew "debordement" dans renregistrement 

suivant 

Le <code retour> est une variable entiere correspondant au numero d'enregistrement qui vient 
d'etre ecrit (si r operation a abouti). Si 1'operation a echoud, pour une raison quelconque, ce code 
est ndgatif. 

-1 fin de fichier, indique que l'adresse du numero d'enregistrement demand* depasse 
64Ko 

-2 erreur tors d'un changement de bloc, ce qui ne devrait jamais se produire. 

Exemples : 
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|BANKOPEN,10 
|BANKWRiTE,@r%," 1 23 tesf ,0 

|BANKWRITE,@r%,w$ 

La commande : 

|BANKREAD,@ <code retour>,@ <chalne alphanumenque> [,<numero 
d'enregistrement virtuel>] 

. . .lit un enregistrement et le copie dans la chalne a partir du fichier virtuel. 

Le <numero d'enregistrement virtuel> definit renregistrement a lire. S'il est omis, ce parametre 
est remplac6 par le numero d'enregistrement courant Le pointeur d'enregistrement passe ensuite 
a renregistrement suivant 

Si le contenu de renregistrement ne remplit pas entierement la chalne, les anciens caracteres (non 
ecrases) restent a la fin de la chalne. Si ce contenu depasse la longueur de la chalne, les caracteres 
excedents sont supprim6s car la longueur d'une chalne ne peut pas etre augmentee au cours d'une 
commande exteme. 

Le <code retour> est une variable entiere correspondant au numero d'enregistrement qui vient 
d'etre lu (si l'operation a abouti). Si I'operation a echoue\ pour une raison quelconque, ce code 
est negatif . 

-1 fin de fichier, indique que l'adresse du numero d'enregistrement demand^ depasse 
64Ko. 

-2 erreur lors d'un cfaangemeot de bloc, ce qui ne devrait jamais se produire. 

Exemple: 

|BANKREAD,@r%,i$,0 

Recherche 

A est possible de rechercher une chalne particuliere a 1 'interieur des enregistrements stockes. 
La commande : 

|BANKFIND,@ <code retour>,<chame recherchee> [,<numero d'enregistrement 
de depart>[,<iium6ro d'enregistrement de fin>]] 

. . . passe tous les enregistrements virtuela en revue. Le <numero d'enregistrement de depart> 
specific le d6but de la recberche.S 'il est omis, la recherche commence a 1 'enregistrement courant 

La recherche procede enregistrement par enregistrement a l'imeiieur des 64 demiers Ko de la 
memoire, jusqu 'a trouver la chalne desiree. 

Si un <numero d'enregistrement de fin> a 6t6 specific, la recherche s'airete apres examen de cet 
enregistrement a moins que la chalne n'ait etc" trouvee avant d'atteindre cet enregistrement 

Si la recherche aboutit le pointeur prend la valeur du numero d'enregistrement contenant la chalne 
recherchee (sinon celui-ci ne change pas). 
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Le <codc retoiu> est une variable entiere correspondantau numero d'enregistrement cooteaant 
la chatne recherchee (si 1 'operation a abouti). Si Foperauon a echou6, pour une raison quelconque, 
le code de retour est n6gatif. 

-1 fin de fichier, indique que l'adresse du numero d'enregistrement de depart depasse 
64Ko ou qu'elle est superieure a celle de renregistrement de fin de recherche. 

-2 erreur tors d'un changement de bloc, ce qui ne devrait jamais se produire. 

-3 pas de cbaine retrouvee. 

La <cbaine recherchee> peut contenir des jokers, indiques par des caracteres nuls : CHR$(0), et 
la comparaison s'effectue par rapport a la <longueur d'enregistrement virtuel> ou a la longueur 
de la <chatne recherch6e>, si celle- ci est plus courte. 

Exemples : 

lBANKRND,@r%,"1 23 tesf.O 

|BANKFtND,@r% r f$,1 00,200 

Attention aux types de donn6es 

Les erreurs evidentes, telles qu'un nombre de parametres errone\ sont signalees par le message 
d'erreur "Bad command" (commande erronee). Cependant, les commandes externes ne ctetectent 
pas les erreurs de '"type mismatch'' (type de variable de correspondantpas). L'utilisateur doit done 
veiller a utiliser des parametres corrects. 

Le programme ci-dessous exploite les commandes de disque virtuel pour etablir et interroger une 
base de donnees comportant des anagrammes de mots de 7 lettres. n vous donne les mots qui 
conviennent et autorise, en outre, 1'emploi de jokers. 

Par exemple, les anagrammes de FIGURES qui se pre"sentent sous la forme : ?RUGS?? (les 
deux demiers points d'interrogation peuvent e"ventuellement etre supprim6s) sont FRUGSIE, 
FRUGSEI, IRUGSFE, IRUGSEF, IRUGSFI et IRUGSIF. 

II faut un certain temps au programme pour 6tablir la base de donned, mais la taillede la memoire 
a gerer, 64Ko, le justifie. 

10 ' ANAGRAMMES par ROLAND PERRY 

20 * copyright (c) AMSOFT 1985 

30' 

40 ' Rappelez vous de faire RUN"BANKMAN" avarrtde lancer votre programme 

C*\ I ***************** ************************* ************* 

60' 

70 MODE 2 

80DEFINTa-z 

90 r%=0:|BANKOPEN,7 

100 INPUT "Donnez un mot de 7 lettres";s$ 

110IFLEN(s$)«o7THEN100 

120 PRINT "patientez..." 

130 LOCATE 1,5:PRINT "computing:" 



Dona9ft&nh«niii»7 Bank Manager 



140FORC1-1TO7 

150FORC2-1TO7 

160IFC2-C1THEN370 

170FORC3-1TO7 

180 IF c3-c2 OR C3-C1 THEN 360 

190FORC4-1TO7 

200 IF c4-=c3 OR C4-C2 OR c4-c1 THEN 350 

210FORC5-1TO7 

220 IF c5-c4 OR c5-c3 OR C5-C2 OR C5«c1 THEN 340 

230 FOR C6-1 TO 7 

240 IF C6-C5 OR C6-C4 OR C6-C3 OR C6-C2 OR c6-c1 THEN 330 

250 FOR C7-1 TO 7 

260 IF c7=c6 OR c7«c5 OR c7-c4 OR C7-C3 OR C7-C2 OR c7-c1 THEN 320 

270o$-MID$(s$,c1,1)+MID$(s$,c2 ( 1)+MID${s$,c3,1)+MID$(s$,c4,1)+ 

MID$(s$,c5 ( 1)+MID$(s$,c6,1)+MID$(s$,c7,1) 

280 LOCATE 12,5:PRINTx;o$ 

290 |BANKWRITE,@r%,o$ 

300 IF r%<0 THEN STOP 

310x«x+1 

320 NEXT c7 

330 NEXT C6 

340 NEXT c5 

350 NEXT c4 

260 NEXT c3 

370 NEXT c2 

380 NEXT c1 

300 lastreo-r% 

400 REM pour les vlsualfeer 

410 r%-0:g$=SPACE$(7) 

420 PRINT:INPUT "ANAGRAMME h RETROUVER (utilisez <?>comme joker): 

M ,m$ 

430 m$-LEFT$(m$,7) 

440 FOR x-1 TO LEN(m$) 

450 IFMID$(m$ r x r 1)-"? ,, THEN MID$(m$,x,1)-CHR$(0) 

460 NEXT 

470 |BANKFIND,@r%,m$,0,lastrec 

480 IF r%<0 THEN GOTO 420 

490|BANKREAD,@r%,g$ 

500 PRINT g$, 

510[BANKFIND,@r%,m$,r%+1,lastrec 

520 GOTO 480 
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Chapitre 8 

A vos heures de loisir... 



Ce chapitre aborde en douceur certaines notions fondamentales de rinformatique en general et 
du 464/6 128 Plus en particulier. Bien qu 'il ne soit pas indispensable de le lire avant d'utiliser votre 
ordinateur, il pourra vous aider a mieux comprendre ce qui se passe "sous le capot". 



Partie 1 : Generates 



Feu sur les envahisseurs de I'espace ! 

Meme si votre seule passion des jeux video motive votre achat du 464/6128 Plus, vous etes 
peut-elre curieux de connaltre la signification de certains termes. Le materiel (hardware) est 
constitue de toutce que vouspouvez toucher (le clavier, l'ecran, les cables de raccordement, etc.), 
le reste repondant a l'appellation de 'logiciel" (programmes, manuels et informations sur disque 
ou cassette). 

Certaines actions de rordinateur dependent du materiel (comme rafficbage couleur sur un ecran) 
mais c'est au logiciel de les utiliser pour produire des textes et des graphiques a recran. 

Le materiel dirige le canon a e"lectrons sur I'affichage eiectrolurninescent du moniteur, le logiciel 
crrdonne et distribue remission afin de produire des sequences significatives sur l'ecran : Feffet 
ic decollage du vaisseau spatial, ou l'apparition d'une lettre a l'ecran lorsque vous appuyez sur 
j touche correspondante du clavier. 

Question : Pourquoi un ordinateur est-II meilleur qu'un autre ? 

7o materiel sans logiciel ne vaut rien, et inversement. H ressort done que la valeur des perfor- 
mances d'un ordinateur ne peut venir que de l'integration harmonieuse des deux, permettant de 
taliser difftrentes taches. II existe plusieurs moyens de juger les performances logicielles et 
r^tenelles d'une machine. 
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Les criteres generalement admis pour qualifier les ordinateurs personnels sont actuellement : 

1. La resolution de I'teran : le plus petit 6l6ment visible de I'affl- 
chage 

Hie resulte d'une combinaison d'elements differents : nombre de couleurs disponibles, nombre 
de pixels (petits points), nombre de caracteres de texte detinissables par ecran. Vous constaterez 
que le 464/6128 Plus dispose de caractenstiques extremement interessantes dans ce domaine. 

2. 1'lnterpr&eur BASIC 

Presque tous les ordinateurs familiaux possedent un interpr6teur BASIC qui pennet de se lancer 
rapidement dans la conception de programmes. Le BASIC integiC a la machine est lui-meme un 
programme, mais extremement elabore - et complique\ ayant necessity des millions d'heures de 
travail pour sa mise au point, depuis son "invention" aux USA. Le "Reginners All Purpose 
Symbolic Instruction Code" (langage symbolique tous usages pour debutants) est le langage le 
plus utilise 1 daans le monde et, comme tous les langages, il possede de nombreux "dialectes" 

Le BASIC disponible dur le 464/6128 Plus est l'un des plus compatibles et peut utiliser des 
progiciels ecrits sous le systeme d'exploitation de disquette CP/M. C'est une implementation tres 
rapide du BASIC et bien qu'il ne vous semble pas qu'il y ait une grande difference entre 0,05 et 
0,125 seconde, sur des milliers d'instroctions a trailer, le meme programme sera presque trois fois 
plus rapide d'une version a 1'autre. 

Vous entendrez souvent parler de langage machine : c'est le seul langage que la machine 
comprenne directement ; il est tres rapide mais desesperernent long a programmer, c'est pourquoi 
on utilise le BASIC couplfi a un interprgteur pour la traduction eii langage machine. 

Le basic de votre AMSTRAD est un des plus rapides et des plus complets que Ton puisse trouver 
sur un micro familial. II est susceptible de pallier certaines lenteurs inherentes aux langages de 
haut niveau et dispose d'effet graphiques et sonores surprenants. 
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3. Extension 

La plupart des ordinateurs sont prevus pour recevoir des extensions matftrieBes telles qu'impri- 
mantes , manettes de jeu , lecteurs de disquettes suppiementaiies. Pourtant, de nombreux micro-or- 
dinateurs faariliaux vous obligent a acheter des interferes d'extension avant de pouvoir brancher 
un dispositif aussi simple qu'une imprimante ou uoe manette de jeu. 

Bien que l'acheteur ne considere pas toujours ses besoins future, une machine poss£dant deja une 
interface pour imprimante (type Centronics) et une interface pour manette de jeu est plus 
economique a long terme. 

Le 464/6128 Plus possede d'origioe une interface Centronics, une entree pour unite de disquette 
supplementaire (6128 uniquement), une prise pour un lecteur de cassette (et une commande 
moteur), une interface pour deux manettes de jeu, une sortie stereo et un bus d'extension pouvant 
recevoir des lecteurs de disquettes, des cartouches ROM, une interface sene, des modems, des 
syntttetiseurs de parole des stylos optiques, etc... 

4. Les effets sonores 

Les caracteristiques sonores en micro-infonnatique vont du systeme qui fait des bruits plus ou 
moins cacophoniques a celui capable de simuler un instrument de musique eiectronique. Les 3 
canaux et 8 octaves du 464/6128 Plus lui permettent de produire des sons d'une bonne qualite" 
musicale avec contrOle total de ramplitude etdes enveloppes de tonalite. De plus, remission est 
authentiquement stereopnonique, avec un canal a gauche, un a droite et un troisieme au milieu. 

Vous pourrez ainsi produire des ambiances sonores impressionnantes, synchronisers avec les 
effets graphiques. 

Rnalement, c'est a vous de voir ce qui iest le phis important pour vous. Nous esperons que vous 
utiliserez toutes les possibilites de votte ordinateur et que vous en tirerez le meilleur parti; 

Pourquoi un micro ne peut-il pas faire cela ? 

Les utilisateurs se demandent souvent pourquoi un ordinateur aussi perfectionne* que le 6128/464 
ne peut produire des images comme on en voit a la television. Pourquoi, par exemple un micro ne 
peut-il animer une image comme dans un dessin anime ou un film ? Pourquoi les personnages 
sont-ils toujours simplifies ? 

La rCponse est simple et complexe a la fois. La r6ponse simple est que Tecran d'un ordinateur est 
beaucoup plus sommaire qu'un ecran TV. La capacite memoire d'une image retransmise a la tete 
est environ 20 fois plus importante que celle d'un ordinateur. De plus, pourfitre animes, tous les 
points de cette image doivent changer 50 fois par seconde. Les ordinateurs capables d'une telle 
performance sont encore de nos jours hors de portee de bien des budgets. 

Les micros doivent se contenter d' une memoire relativement petite comparee aux mega-ordina- 
teurs. Leurs images sont done plus saccadees et leur resolution d 'ecran bien moins elevee. Bien 
que 1 'on s 'en approche un pen plus chaque jour, on est encore assez loin des dessins ammes qu'on 
voit a la television. 
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Le clavier : un air de d6|a vu... 

Pourquoi ne peut-on simplement s'asseoir devant un micro et taper une page de texte dans la 
machine? 

Ne vous laissez pas induire en erreur par le fait qu'un ordinateur ressemble a une machine a ecrire 
avec un ecran : c'est un appareil qui communique avec vous par l'interrn6diaire d'un langage de 
programmation. A moins que vous iui indiquiez autre chose, l'ordinateur interprete tous les 
caracteres que vous tapez au clavier comme des instructions. Quand vous appuyez sur la toucfae 
[RETURN] l'ordinateur ananlyse ce qui a 6\6 tape, et si le BASIC integre" ne comprend pas ces 
instructions, il vous repondra par le message : 

Syntax error 

Cependant, il se peut que le programme resident dans votre ordinateur soit un systeme de 
traitementde texte. Dans ce cas, vous pouvez taper n'importe quel mot et appuyer sur [RETURN] 
puis continuer de taper comme si vous travailliez sur une inachine a ecrire eiectronique. Mais pour 
ce faire, il vous faut d'abord charger dans la memoire de la machine, un programme de traitement 
de texte. 

L'ordinateur semble combiner plusieurs appareUs familiers : un ecran de television, un clavier de 
machine a ecrire et un magnetophone a cassette. Vous devez toutefois vous rappeler que ces 
ressemblances sont superficieUes, l'ordinateur ayant des capacites d'un autre ordre etdtant destine- 
a un usage completement different 
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Mais qui a peur du jargon informatique ? 

Comme beaucoup d'industries specialisees, rinformatique a developpe" son propre jargon, un 
moyen rapide de parler de choses compliquees qui demanderaient beaucoup d'explications en 
langage courant Le fait de se retrancher derriere un langage souvent compkqu6 et non accessible 
aux profanes n'est pas specifique aux informaticiens. Cbacun de nous s'est un jour heurte' a des 
difficultes de comprehension dans des domaioes autres que rinformatique. 

Le jargon informatique utilise des mots simples, empruntes au langage courant (bien souvent 
anglophone), pour decrire directement et sans ambigulte - les concepts precis de la science qu'il 
sert Au contraire d'une barriere, il est un outil de communication puissant, a l'image des langages 
de programmation, dont certains seraient tentes d'filever la maltrise au rang d'expression artisti- 
que. 

L'informatique est comprise rapidement par les jeunes qui en apprecient la precision et la 
simplicity. Ne voit-on pas plus de programmeurs de 10 ans que d'avocats du meme Sge ? 
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Bases du BASIC 

Pratiquement tous les micro-ortiiBdeara feminaux utilisent te langage ippefc BASIC n crt 

maintenantpasse au rang de langage perf ormant destind a la conception dc programmes d one 

puissance et d'une complexitf extrtme. 

Son nom reste toutefois synonyme de &cilit£ et guide Les debutants de rinformatique du simple 

programme a des applications de statistiques e"laborees. 

Le BASIC est un langage interactif qui interprete un certain nombredecommandesbien denies 

puis effectue divers traitements sur les donnees qui uri sont fouraies. Contrairement ^aux langages 

humains disposant de 5000 a 8000 mots, BASIC se debrouille avec environ 200 mots. Les 

programmes ecrits en BASIC doivent obfir a des regies simples et rigides et respecter une syntaxe 

precise, implacablement sanctionn6e par le message : 

Syntax error 

Ce n'est pas aussi contraignant qu 'il le semblerait tout d'abord - un simple moyen d'indiquer que 

l'ordinateur ne comprend pas ce que vous voulez dire (bien souvent par la faute d'une virgule ou 
de guillemets mal places, ou encore d'un O confondu avec un (zero)). Les ordinateurs sontavant 
tout des machines a calculer, pourvues, il est vrai, d'operateurs sophistiques depassant le stadede 
la simple operation arithm£tique, mais conservant encore la rigiditS lnnerente au traitement 
numenque. 
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Des chfffres s*II vous plait.. 

Si vous aviez les oeuvres completes de Victor Hogoninin ontinateur, voosae trouveriezpas one 
seule fcare ou un seul mot dans lc systeme : toute doonee, toot rensdgnemeot est d'abord 
transforms en cbiffre et en nombre avant que 1 'ordinateur ne soit capable de les mampuier. 

Le BASIC interprete les mots comme des cbiffres afin que rordinateur puisse les traiter a l'aide 
d'additions, de soustraclions ou d'operations booleennes. H est aussi A mfime de comparer ces 
donnees (tables de verite* , oui-non, etc.), de verifier que deux conditions sont remplies en mfime 
temps (et, ou inclusif), etc. 

Grace au programme, rordinateur divise toute tflcbe en une infinite d'operations "oui-non". 




Si ce precede" vous semble compliqu6, vous n'avez pas tout a fait tort Vous venez meme de 
^couvrir une des ventes premieres de la programmation. L'ordinateur est simplement une 
machine accomplissant des tflcbes repetitives extremement vite et avec une precision absolue.Le 
5 ASIC interprete les instructions comme elles apparaissent dans le programme et les traduit en 
.2 langage que lemicroprocesseur comprend. Seulement 2 positions sont comprises par la logique 
; un ordinateur : "oui" ou "non" representes en binaire par "1" et "0" ; ce qui signifie en logique 
• >leenne "vrai " et "faux". Le "peut-etre" ou "il se peut que" n'existent pas. Le proc6d6 qui 
oosiste a traiter des donnees ou 1 est souvent appele" numerique, par opposition au traitement 
auJogique, jouant sur la variation continue du signal eiectronique. 

vuis dans un monde r6duit aux deux chiffies, et 1, comment allons-nous compter ? 
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Cette matrice peut placer (10x10) elements, tea fl£meots dotes de 1 Itant recoanas comme 5,3 et 
5,5. 

Une matrice binaire 256x256 peut ainsi manipuler 65536 elements differents en utilisani on octet 
pour l'adresse verticale et un octet pour 1 'adresse horizontale. 

Pour raccourcir, on utiKse le Kilo octet (K ou KO) qui est egal a 1024 octets (le kilo ne valant pas 
1000 en informatique). Voila pourquoi un ordinateur comme le 464/6128 Plus, consider^ comme 
un 64K dispose en fait de 65536 octets (64 x 1024) de memoire. 

Heureusement, le BASIC opere les conversions pour vous et vous pourrez devenir un tots boo 
programmeur sans trop connaltre le binaire. Cela vous aidera toutefois a comprendre pourquoi 
certains nombres ont plus d'impoiiance que d'autres en informatique. 

Cependant... ™1 

Bien que simple et elegante, la numerotation en binaire est composee de chiffres mterminables et 
peut engendrer des inexactitudes puisqu'une lecture du binaire ne se fait pas en un coup d'oeil. 

On a done cboisi de recourir a un systeme de notation en base 16, comme puissance de 2 capable 
de traduire les nombres binaires d'unemaniere plus concise. On 1'appelle le systeme hexadecimal, 
HEX pour abreger. 



Decimal 

0123 4567 8 910111213 1415 

HEX 

0123456789ABCDEF 

Le systeme hexadecimal peut decomposer les 8 bits d'un octet en deux blocs de quatre bits, 15 
s'exprimant par un nombre a quatre bits : 1 1 1 1 en binaire. 

Le premier bloc indique le nombre d'unites de "1 5' ' et le second indique le reste. 



,SfqK:"'- 
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ConsMerons la table avcc les notations binaires, decimal et hexadecimal : 



Decimal 


8 aa aire 


Hexadecimal 











1 


1 


1 




2 


10 


2 


3 


11 


3 


4 


100 


4 


5 


101 


5 


6 


110 


6 




7 


111 


7 


8 


1000 


8 




9 


1001 


9 


10 


1010 


A 




11 


1011 


B 




12 


1100 


C 




13 


1101 


D 


14 


1110 


E 


15 


1111 


F 


16 


10000 


10 



Un nombre a 8 bits peut etre decompose eo deux nombres de 4 bits (appel6s nibbles en anglais, 

ce qu'on peut traduire par petite bouchee...). 

Dans ce livre, les nombres bexadecimaux sont designed par le symbole &, &D6 par exemple, et 

servent anx programmeurs qui utilisent le langage assembleur, a mi-cbemin entre le langage 

machine etle BASIC 

Poor convertir de l'hexadecimal, vous devez faire attention a multiplier le premier chiffre par 16 

et lui ajouter le deuxieme. Ainsi &D6 donne (13xl6)+6-21 4 et non pas 1 3 et 6 ou 1 36 comme on 

serait tente" de le faire. 

C'est le meme precede que cehri du systeme decimal, a ceci pres qu'il est plus facile de multiplier 

par 10 que par 16! 

SI vous avez tout compris jusque la, sans trop de poblemes, vous saurez rapidement maltriser le 

46*6128 Plus pour produire quantite de programmes. Si vous voulez vous perfectioaner, vous 

poavcz vom procurer des ouvrages informatiques qui vous expUquerontplus en detail ce que nous 

ne pooYona qu'effleurer dans ce livre. 
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Partie 2 : Fonctions propres au 6128/464 



Cette partie approfondit certains aspects propres au 464/6128 Pius. Le Conrs Hementaire et le 
chapitre "Liste complete des mots cles du BASIC AMSTRAD 6128/464" vous foumiront toutes 
les informations de base dont vous pouvez avoir besoin. 

Sujets aborctes 

•5^- jeu de caracteres 

ft Ascn 

ft Variables 

ft Logique 

ft Caracteres d6finis par 1'utilisateur 

ft Formatage de PRINT 

ft Fenfetres 

ft Interruptions 

ft Donnees 

ft Sons 

ft Graphiques 

ft Graphiques exploitant la me"moire suppl6mentaire 

Parlons un peu de caractere 

Lorsque vous tapez sur le clavier de votre 6128/464, ne vous fiez pas aux lettres et uombres que 
vous voyez s'afficher a 1'ecran. Comme nous l'avons deji dit, voire ordinateur n'est pas une 
machine a ecrire. Ce qui apparalt n'est que le resultat d'une combinaison de contacts electriques 
declenches par la pression des touches, Les signaux eiectriques declencbes par cette action sur les 
touches sont traduits, dans les circuits internes de rordinateur, afin de produire a 1'ecran certain 
motifs de points. Ces motifs forment des lettres, des nombrcs ou des symboles propres au jeu de 
caracteres du 6128/464. 

Certains caracteres affiches ne sont pas directement accessibles par les touches du clavier mais 
peuvent etre visualises au moyen de rinstruction PRINT CHR$ (<nombre>). Les elements 
stockes dans rordinateur se presentent tous sous forme d 'octets offrant, comme nous venons de 
le voir dans la partie 1 de ce chapitre, 256 combinaisons de valeurs possibles. L'ordinateur devant 
faire appel a au moins un octet pour chaque caractere stockC dans sa memoire (que vous le vouliez 
ou non, e'est la plus petite unite geree par le 6128/464) les 256 possibilites ainsi disponibles 
depassent largement les 96 caracteres, dits standard, d'une machine a ecrire, menageant ainsi 160 
octets supptementaires dont il serait stupide de ne pas tirer parti. 
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L'ensemble des caracteres 'Standard" s'appelle un "sous-jeu". Dans le monde de rinformatique, 

a s'inscrit dans la categorie du systeme d'affichage "ASCII", acronyme d'American Standard 
Code for Information Interchange. A Forigine, ce systeme assurait la transmission de donnees 
d'un ordinateur a 1'autre sous une forme que les systemes reconnaissenL Vous trouverez dans le 
chapitre "Pour information.. . " la liste des caracteres ASCII ainsi que les caracteres supplementaires 
du 6128/464 accompagnes des codes numeriques correspondant. 

Comment en arriver Id... 

■...;.» 

Au point oh nous en sommes, le programme d'affichage do jeu de caracteres : ■'" 3 

10FORn-32t0 255 \ '■"! 

20 PRINT CHR$(n) ; 
30 NEXT 

. . .n'a certainement plus de secrets pour vous. Decortiquons-le maintenant : 

Nous constatons tout d'abord qu'au lieu d'ordonner PRINT ,1 abcdefgQijTdmn...etc", nous avons 
entre" PRINT CHR$(n), n grant une representation pratique de "variable". Une variable est un 
616ment d'information qui "varie" selon les instructions du programme. (Le cboix de n pour 
variable est tout a fait aroitraire, nous aurions pu prendre n'importe quelle combinaison de lettres 
pourvu qu'elle soit differente d'un mot c!6). 

Comment reconnaltre une variable ? 

Le chiffre 5 est fixe, il est compris entre 4 et 6 ; U n'est done pas une variable. Le caractere n est 
6galement fixe, e'est une lettre de l'alphabet 

Comment l'ordinateur peut-il done faire la difference ? Si la lettre n avait ele" declaree comme 
caractere alphabettque, elle aurait 6t£ tapee entre guillemets "n", et rordinateur, incapable de 
comprendre la sequence FOR'V - 32 TO 255, aurait repondu par le message Syntax error. 

En tapant n sans guillemets, nous avons indiqu6 a 1'ordinateur qu'il s'agissait d'une variable. En 
BASIC, une commande FOR doit etre suivie d'une variable : l'ordinateur rejette done tout ce qui 
endiffere. 

Nous venons d'indiquer a Tordinateur que n = 32 TO 255, ddfinissant ainsi les valeurs possibles 
pour la variable. En firit, il s'agit d'une sequence commenfant a 32 et finissant a 255. 

Apres avoir declare cette variable, nous devons alors indiquer a l'ordinateur ce qu 'il doit en faire, 
e'est justement le role de la ligne 20 : 

20 PRINT CHR$(n); 

Quelle que soit la valeur de n, l'ordinateur doit recbercher dans sa memoire le caractere 
correspondant, afin de l'afficher 4 l'ecran. 

Le point- virgule terminant la ligne 20 indique a rordinateur qu'il ne doiteffectuer ni retour chariot 
ni saut de ligne. (Car chaque caractere serait affiche" en premiere colonne d'une nouvelle ligne.) 
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Uligre30Imc<MHnande(fcrcvaifrilaBg^ sot la premiere 

valeur de d (a savoir 32), et d'effectuer la m&ne operation pour la valeur sirivante (NEXT) de la 

variable n. Ce precede que Ton appelle "baude", est l'un des concepts primordiaiix de la 

programmation. n vous 6vite de retaper de longues sequences ^instructions et vous apprendrez 

ties vite a vous en servir dam vos programmes. 

Lorsque la boucle FOR NEXT atteint la deraiere valeur de la fourchette declaree (255), cette 

operation s'arrete et rbrdinateur cherche la ligne suivant la Ugne 30. Comme U n'y en a pas, le 

programme cesse et revient au mode direct avec affichage du message Ready, signalant ainsi 

qu'il est pret a recevoir de oouvelles instructioDs. Vous pouvez alors, si vous le deHrez, entrer 

RUN une nouvelle fois pour tbp&a l'execution du programme. Ce dernier est stock* dans une 

partie de la memoire ou il restera tant que vous ne donnez pas 1'ordre de le retirer et tant que 

l'ordinateur reste sous tension. 

Ce programme est l'illustration parfaite d'un aspect fondamental de 1'informatique : tout ce que 

fait l'ordinateur se rapporte a des nombres. n a affiche l'alphabetettoutun ensemble decaracteres 

par le biais de leur reference numerique. Lorsque vous appuyez sur la toucbe A, vous ne demandez 

pas 1'afficnage du A mais vous invitez l'ordinateur a rechercber dans sa memoire rinformation 

numenque correspondant a l'affichage du A snr l'ecran. L'emplacement de cette information est 

dfifini par un code numenque mis en oeuvre par Taction de la toucbe du clavier. 

Chaque caractere correspond a un nombre. Vous trouverez une liste de references dans la partie 

3 du cbapitre 'Pour information...". 

De mfcne, 1'affichage des caracteres a l'ecran n'a rieo a voir avec l'ecriture teUe que vous la 

connaissez : la encore, il s'agit de nombres. 

Ainsi, en code ASCII la lettre A correspond a 97. Mais 1'ordiiiateOT ne WHnprend pas ce nombre 

(il n'est pas tres fut6) ; 97 doit d'abord erre converti du code decimal en un code que l'ordinateur 

puisse reconnattre, c'est-a-dire en langage machine (dont les principes sous-jacents sont abordes 

pifc^demment dans ce chapitre). 

A premiere vue, la conversion des nombres decimaux en notation hexadecimale peut sembler 

laborieuse. Nous sommes tellement habitues a compter en base 10, qu'en changer nous paratt aussi 

farfelu que de manger avec le couteau en tenant la fourchette dans 1'autre main ! 

L'assinrilation de la notation liexadecimale exige une petite gymnastique intellectuelle qui, apres 

que vous l'aurez mattrisee, vous ouvrira la porte sur un grand nombre de notions infonnatiques. 

Si les systemes de numeration binaire et hexadecimale restent flous pour vous, nous vous 
conseillons de lire ou de retire attentivement la premiere partie de ce chapitre. 
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Une fois que l'ordinateur a traduit 1'activation de la touche A par une serie de no/nbres qu'il 
comprend, il recherche la partie de la memoire indiquee afin d'obtenir une autre sene de nombres 
definissant a leur tour le caractere a l'ecran. La lettre que vous voyez apparaitre est done constituee 
d'un bloc de donnees stocks en memoire sous forme de "matrice" numerique : 



jTTi 




^=e 



m 



MATRICE GRILLE 



a MINUSCULE 



A MAJUSCULE 



La matrice se compose de Hgnes et de colonoes de points. Le caractere s'affiche par activation ou 
deactivation de la sequence de points requise, chaque point 6tant d6termin6 par des donnees 
stockees dans le memoire de Pordinateur. Dans le cas du 6128/464, les matrices ou "cellules" de 
l'ecran sont constituees de 8 lignes sur 8 colonnes. Si le caractere que vous desirez afficher n 'existe 
pas parmi les 255 disponibles, vous pouvez le definir a Faide du mot cle* SYMBOL, decrit dans 
une partie ulteneure de ce chapitre. 

Les "caracteres dCfinis par Futilisateur" s'obtiennent en combinant chacun des 64 points de la 
matrice, ce qui represente un grand nombre de possibilites. De plus, la capacity de reunir des blocs 
de caracteres pour constituer des caracteres plus larges ouvre les possibilites graphiques i votre 
seule disponibilite ou imagination. 

Expressions logfques 

Une des grandes differences entre un simple calculates et un ordinateur reside dans la capacity 
qu ' a 1' ordinateur a manipuler les operation s logiques dans des applications telles que la sequence 
IF...THEN (si...alors). Les operateurs logiques traitentles valeurs auxquelles ils sont appliques en 
tant qu 'ensembles de bits sur lesquels ils operent Leur description et leur utilisation est tout a 
Cut... , logique, mais il est tres difficile de decrire la logique en termes simples. 

Disons qu'une expression logique comprend deux arguments et un operateur logique. Uoe 
expression logique comprend : 

<argument>[<ope'rateur Iogiquexargument>] 

oil rargument est defini comme suit : 

<argument> - NOT <argument> <expression numeriquO <expression relationnello <expres- 
rion logiquo 

Les deux arguments de part et d'autre d'un operateur logique sont convertis en nombres entiers 
(ce qui peut dans certains cas provoquer rerreur N 6, lorsque les nombres a convertir n'appartien- 
oait pas a rintervalle des nombres entiers de Fordinateur). 
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Les operafeurs logiques soot, par ordre de priorite : 

AND (-et) resultat sauf si les deux arguments sont vrais (bits indicateurs tous les deux 1) 

OR (=-ou inclusif) resultat 1 sauf si les deux arguments sont faux (bits indicateurs tous les deux 

0) 

XOR (=ou exclusif) resultat 1 sauf si les deux arguments sont identiques (bits indicateurs 

identiques). 

AN D est le plus courant et ne veut pas dire "ajouter". 

PRINT 10 AND 10 
Resultat 10! Mais 

PRINT 10 AND 12 
Resultat 8 

PRINT 10 AND 1000 

Rfsultat 8 aussi! 

Ceci est do au fait que 10 et 1000 out ete convertis en lew equivalent binaire. Droles de 
mathematiques, mais rappelez-vous que les operateurs logiques ne connaissent que le systeme 
binaire et 1 , vrai ou faux. 

Explication : 

lOenbinairelOlO 

1000 en binairel 1 1 1 101000 

L'operateur AND venfie les 1 se trouvant en meme position dans les deux nombres et trouve : 

0000001000 

. . .qui en systeme decimal est egal a 8. L'operateur logique AND (=et) verifie si deux conditions 
sont vraies en meme temps. Voici un petit programme explicauf : 

10 INPUT "Aujourd'hui nous sommes le";jour 

20 INPUT "Quel est le numero du mois";mois 

30 IF jour-25 AND mois-12 THEN 50 

40CLS:GOT010 

50 PRINT "Joyeux Noel I" 

ORopere egalement par bits, donnant 1 dans tous les cas ou les deux bits des arguments different 
de 0, auquel cas le resultat est egal a 0. Avec les memes nombres que dans l'exemple AND : 

PRINT 1000 OR 10 
1002 
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En binaire: 1010 

1111101000 

R£sultat:l 11 1101010 
Dans un programme : 

10CLS 

20 INPUT "Quel est le numero du mois";mois 

30 IF mois=12 OR mois-1 OR mois-2 THEN 50 

40 GOTO 10 

50 PRINT "Nous devrions etre en Hiver !" 

L'operateur NOT inverse cfaaque bit de r argument (0 devient 1 et inversement) : 

10CLS 

20 INPUT "Quel est le numero du mois";mois 

30 IF NOT (mois-6 OR mois-7 OR mois-8) THEN 50 

40 GOTO 10 

50 PRINT "Nous ne pouvons etre en Ete I" 

On peut aussi mglanger autant d'operateurs logiques qu'on le desire (dans la limite d'une hgne) 
pour donner, par exemple : 

10 INPUT "Aujourd'hui nous sommes fe";jour 
20 INPUT "Quel est le numero du mois";mois 
30 IF NOT (mois-1 2 OR mois=1 ) AND jour-29 THEN 50 
40CLS:GOTO10 

50 PRINT "Ce n'est ni Decembre ni Janvier mais c'est peut-etre une annee bis- 
sextile" 

Le n5sultat d'une expression relationnelle est soit -1, soit 0. La representation binaire de - 1 donne 
une configuration binaire dont tous les bits valent 1, et celle de en donne une dont tous les bits 
\ alent 0. Le resultat d'une operation logique sur de tels arguments donnera -I pour vrai et pour 
faux. 

A joutons deux lignes pour compliquer : 

60 PRINT NOT (mois-12 OR mofs-1) 
70 PRINT (mois-12 OR mois-1) 

Si vous lancez le programme avec 29 pour le jour et 2 pour le mois, vous obtenez la rtponse de 
.a ligne 50 et les valeurs produites par les expressions des lignes 60 et 70.. 

Pour finir, XOR (OU eXclusif) donne un nisultat vrai si les deux arguments sont differents. 



r»\ 



A vos heures de loisir Chapitre 8 Page 307 



Lancez les rotatives ! 

PRIOT est une des premieres commandes que vous utilisezlorsque vous dfibutezen infonnatique. 
Bile fait partie des commandes du BASIC dont le nom indique reellement la fonction... en 
apparence. En fait, PRINT suppose beaucoup plus de cnoses qu'il n'en paralt : ou placer 
l'affichage ? De quelle maniere ? 

Format de PRINT 

La commande PRINT peut s'utiliser de plusieors facons, la maniere la plus staple ttantde la faire 
suivre de I'eTement a afficher ou imprimer : un norabre, une cha3oe ou un nom de variable. 

PRINT3 
3 

PRINT "bonjour- 
bonjour 

a-5 

PRINT a 
5 

a$-"test" 
PRINT a$ 
test 

L'instniction PRINT peut contenir phisieurs elements intercales d'un separateur, TA B ou SPC. 
Les virgules et les points-virgules sont des separateurs. Le point- virgule permet 1'affichage aligne* 
des elements et la virgule provoque le decalage de Faffichage sur la zone suivante. Bien que la 
largeur initiale d'une zooe soit de treize caracteres, vous pouvez la modifier a l'aide de la 
commande ZONE. 

PRINT 3;-4;5 
3-45 

PRINT "bon)our ";"Mon8leur 
bonjour Monsieur 

PRINT "bonjour "."Monsieur" 
bonjour Monsieur 

PRINT 3,-4,5 
3-4 5 

ZONE4 
PRINT 3,-4,5 
3-4 5 
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Les Dombres positifs sont prec6d6s d'un espace et les nombres negatifs du signe moins. n sont 
tous suivis d'un espace. Les chalnes s'affichent exactement telles qu'elies apparaissent dans les 
guillemets. 

La fonction SPC accepte on parametre numenque delfinissant le nombre d'espaces a afficher. 

Pour les valeurs negatives le nombres pris en compte est zero, si la valeur est sup6rieure a la largeur 
de la fen6tre, c'est la largeur de la fenetre qui est alors prise en compte. 

PRINT SPC(5) "coucou" 
coucou 

X-3 

PRINT SPC(x*3) "coucou" 
coucou 

TAB fonctionne de maniere identique, mais affiche le nombw-d'espaces requis de facon a ce que 
Tenement a afficber apparaisse a la colonne specifiee. 

Le canal ou apparaissent toutes les donntes en sortie est la fenetre 0, a moins qu'un specificateur 
de canal (#) ne precede la lisle d'e"16ments a afficber. Vous pouvez utiliser d'autres canaux pour 
la sortie sur d'autres fenetres. Les canaux 8 et 9 sont particuliers : le canal 8 correspond a une 
imprimante et le canal 9 achemine les donnees sur un fichier de disquette (ou de cassette). Dans 
ces cas-la, la commande WRITE est toutefois preferable a PRINT. 

PRINT "bonjour - fenetre 
bonjour 

PRINT #0,"bonjour" - fenetre aussi 
bonjour 

PRINT #4,"bonjour" -1enetre4 
bonjour (En haut de I'ecran) 

PRINT #8,"bonjouf* - sur I'imprimante 
bonjour (si connectee) 

Bien que TA B et SPC conviennent parfaitement aux formats d'afTichage simples, une visualisa- 
tion plus detaillee des informations demandera l'utilisation de la commande PRINT USING, 
accompagnee du modele de format adequat Un modele de format est une chatne contenant des 
caracteres speciaux, specifiant chacun un type de format particulier. Ces caracteres, appel6s 
"specificateurs de format de zone" font l'objet d'une approche plus d6taillee dans la description 
du mot cte PRINT USING, (pr6c6demment dans cet ouvrage). Les quelques exemples suivants 
vous apporteront cependant des eclaircissements sur le sujet 

Pour commencer, voici les formats destin6s a 1 'afficbage des cbalnes : 

PRINT USING "\ \";'test de chatne" 
tests 

"!" seat a afficher le premier caractere d'une chalne. 
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PRINT USING T;"test de chatne" 
t 

Lc format le plus utile pour les chalnes est encore "&". n empeche l'affichage d'une chalne sur 
■oe nouvelle ligne. En effet, lorsqu'une cnalne ne tient pas sur la ligne en cours, le BASIC la 
reporte par d6faut sur une nouvelle ligne. PRINT USING "A^permet de passer outre. 

(Utilisez BORDE R pour visualiser les bords du papier.) 

MODE l:LOCATE 39,1:PRINT "trop longue" 

- ligne 1 
trap longue - ligne 2 

mode 1:locate 39,1:PRINT USING "& H ;"trop longue" 

tro -ligne 1 
p longue -ligne 2 

Poor l'affichage de nombres, vous disposez de multiples modeles. Le plus simple Ctant PRINT 
USING ##### t ou chaque # correspond a un chiffre. 

PRINT USING "######";123 
123 

Vous pouvez introduire le point decimal a l'aide de".". 

PRINT USING "####.";1 2.45 
12.45000 

Les chiflres avant le point ddcimal peuvent etre regrouped par trois et separes par des virgules. II 
faut alors faire appel a "," dans le modfcle avant le point decimal. 

PRINT USING "ft tftf ### ## , .####"; 123456.78 
123,456.7800 

Les dollars flottants et les signes £ peuvent fetre inclus dans le format - ex : un signe courant sera 
toujours imprime' directement avant le premier chiffre d'un nombre - 

"$$" et " FF" permettentd'inclure des signes de monnaie flottants affich6s avant le premier chiffre 
du nombre m£me s'il ne remplit pas le format entier. 

PRINT USING "$$##";7 
$7 

PRINT USING "$$#F;351 
$351 

PRINT USING ,, F####,.##";1 234.567 
F1 ,234.57 

Vous remarquerez que le resultat est airondi. 
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dans Ie module remplace les blancs precSdant le nombre par des astfrisquet 



PRINT USING "**####.r;12.22 
****12.2 



Vous pouvez combiner les asterisques aux symboles monetaires : "**$-.*tc" ou "**F,-.etc". 
Le signe "+" au d6but du modele de format demande le placement du signe du resultat, avant le 
premier chiffre. S'il figure a la fin du modele, le signe est place" apres le resultat. 
Le signe "-" ue peut se Irouver qu'a la fin du modele de format pour qu'apparaisse un signe moins 
apres les nombres ndgatifs. 



PRINT USING "+##";1 2 
+12 

PRINT USING "+#r;-12 
-12 

PRINT USING "##+";12 

12+ <-^ 

PRINT USING "##-";-12 
12- 

PRINT USING "##-";12 
12 

Pour exprimer un nombre sous forme exponentielle, vous pouvez utfliser "TttT" dans te modele. 

PRINT USING "###,## TTTT";! 23.45 
12.35E+01 

Lorsque vous utilisez des modeles de format, le symbole % apparatt devant le resultat si le nombre 
depasse le modele specific (afin d'indiquer que le rcsultat n'a pas 6tC raccourci pour satisfaire au 
modele). 

PRINT USING "###F;1 23456 
%123458 
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A vos fenetres ! 

Le BASIC du 6128/464 permet de dfifinir jnsqu'ft huh fenttres de texte. Toutes les commandes 
d'acbeminement du texte vers 1'ecran peuvent servir a envoyer l'afficnage sur Tune de ces 
fenetres. 

La commande de definition d'une fenetre s'intitule tout naturellen.ent WINDOW. EUe est suivie 
de 5 valeurs. La premiere, facultative, specific la fenetre desiree C a fenetre par dtfaut). Tous les 
messages du BASIC (Ready par exemple) s'affichent dans la r enetre 0. Precedant ce chiffre, le 
symbole diese (#) l'identifie en tant que specificateur de canal Les quatre parametres restant 
correspondent aux limites gauche, droite, supeneure et inferieure de la fenetre. Ces valeurs 
definissent les limites en termes de lignes et colonnes d'ecran et doivent done etre comprises entre 
1 et 80 dans le sens horizontal et entre 1 et 25 pour la verticale. 

L'exemple suivant ddfinit une fenetre 4 allant de la colonne 7 a la colorme 3 1, et de la ligne 6 a la 
ligne 18. Reinitialisez votre ordinateur et tapez : 

WINDOW #4,7,31 ,6,18 
Rien ne s'affiche apres l'entree de cette commande, mais si vous tapez : 

INK 3,0 
PAPER #4,3 
CLS#4 

. . am grand rectangle vert apparatt a Tecran definissant la fenetre 4. L'exemple ci-dessus montre 
que l'introduction du numero de canal permet d'utiliser PAPER et CLS avec chacune des nuit 
fenetres. La commande agit par detaut sur la fenetre 0. 

Toutes les commandes ci-dessous peuvent etre accompagnees d'un specificateur de canal identi- 
fiant la fenetre sur laquefle elles vont agir. 

CLS 
COPYCHR$ 

INPUT 

LINE INPUT 

LIST 

LOCATE 

PAPER 

PEN 

POS 

PRINT 

TAG 

TAGOFF 

VPOS 

WINDOW 

WRITE 

La fenetre verte que vous venez de creer a obscurci une parti du texte deja afficnee (sur la fenetre 
0). 
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Le texte peut 6tre dirig6 vers uoe fenetre donnee en integrant un specificateur dc canal dans la 
commande PRINT. 

PRINT #4, M coucou" 

Ces mots apparaitront en haul du rectangle vert au lien de s'afficher sur la ligne suivante comme 
lors de l'entree de : 

PRINT "coucou" 

Vous constatez qu'une parte de la fenetre verte a ere reconvene par le texte. 

Si vous desirez voir tous les messages du BASIC s'afficher dans la fenetre 4, par exemple, la 
commande WINDOW SWAP permet de la substituer a la fenetre par defaut : 

WINDOW SWAP 0,4 

Le message Ready qui va suivre cette commande s'affiche alors dans la fenetre verte. Le curseur 
se trouve imm6diatement dessous. Tapez maintenant la ligne : 

PRINT#4,"coucou" 

... et le mot "coucou" va apparaltre directement sous la commande WINDOW SWAP dans 
l'ancienne fenetre 0, (la fenetre 4 a present), n ressort que la position d'un affichage a l'interieur 
d'une fenetre est stockee et que, meme apies uq WINDOW SWAP, le texte s'affiche sur cette 
position plut6t qu 'en baut Entrez ; 

LOCATE #4,20,1 

PRINT "la fenetre est ici" 

PRINT #4,"ceci est la fenetre 4" 

Le message "la fenetre est ici" apparatt sur la ligne PRINT tandis que le mes- 
sage "ceci est la fenetre 4" s'affiche au milieu de ta premiere ligne de I'ecran. 

Avant l'entree d'une commande WINDOW, les huit fenetres couvrent la totahte de I'ecran. C'est 
egalement vrai pour une commande MODE. Ainsi, lorsqu'apres avoir utilise des fenetres, le 
curseur se trouve dans une fenetre tres reduite, il vous suffit de taper MODE 1, comme ceci : 

MODE1 

WINDOW 20,21 ,7,1 8 

MO 

DE 1 

Ne vous inquietez pas si le mot MODE est coupe en deux, cela ne l'empeche pas de remplir sa 
fonction. Par contre, n'oubhez pas de laisser un espace entre MODE et 1. 
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Vous connaissez maintenant le fonctionnement des fenfitres, essayez done d'entrer ce petit 

programme: 

10 MODE 

10FORn-0TO7 

30 WINDOW #n,n+1,n+6 ( n+1,rt46 

40 PAPER #n,n+4 

50 CLS #n 

60 FOR c-1 TO 200:NEXT c 

70 NEXT n 

n dfifinit huit fenfitres de couleurs difffirentes se chevauchant. Lorsque l'execution du programme 
est terminee et que le message "Ready" apparait, appuyez sur ENTER plusieurs fois et observez 
le changement de couleur de l'ecran que provoque le d6filemeot de la fenfitre 0. Les blocs de 
couleur dfifilent, mais remplacement des autres fenfitres ne change pas. Entrez maintenant : 

CLS #4 

. . . pour constater que la quatrieme fenetre est toujours a la mfime place. Comme vons vous en 
doutiez, le nouveau bloc de couleur a obscurci ceux qu'il recouvre. A tirre d'mformation, observez 
la difference enrre les diverses entrees : 

LIST 
LIST #4 
LIST #3 

La commande WINDOW pr6sente une autre particularite" qu'illustre le dernier programme de ce 
cbapitre : rordre d'eotree des dimensious gauche et droite des fenfitres importe peu. En effet, si 
le premier parametre est superieur au second, le BASIC trie automatiquement les dimensions et 
les replace dans rordre. Cette remarque est egalement valable pour les limites inferieures et 
superieures des fenfitres. 

10 MODE 

20 a-1+RND*19:b-1+RNDM9 

30 c-1+RND*24:d+RND*24 

40e-RND*15 

50 WINDOW a,b,c,d 

80 PAPER e:CLS 

70 GOTO 20 

Puis-)e vous interrompre ? 

Vous 1'avez peut-fitre remarque, 1'une des innovations logicielles majeures des ordinateurs 
AMSTRAD consiste a gerer les interruptions a partir du BASIC ; en d'autres termes, le BASIC 
AMSTRAD est capable d'executer un certain nombre de Uches independantes a rinterieur d'un 
mfime programme. Cette capacity connue sous le tenne de "multitache", est gfiree par les 
commandes AFTER et EVERY. 
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La possibility de mettre les sons en file d'attente et de les synchroniser par des rendez-vous 

represente un autre exemple de cette particulante. 

La svnchronisation du systeme incombe k son horloge maltresse. Hie est constitoee d'un systeme 

toSeaaa* (le balayage de l'affichage et la frequence du processeur, P""^>; ™" le * 
fl^ l^ieUesl rapportaut au temps peuveat se retrouver dans 1'horioge * quartz du 

systeme. acted 

t Mmnlementation logicielle de cette syncbronisation appartient aux ccmmandes AFTER et 
L eK Y£ convivialite du BAtfC AMSTRAD, celles-ci font exactement ce qu el^s 
^diquent MTER (apres) la duree definie dans la commands le programme doune le controle 
au sous-programme indique qui execute la tacbe definie. 

Le 6128/464 gere en permanence une borloge temps reel. La commaode AFTER permetj j ^un 
n^gr^nmeen ^ic'o^eieris sous-pmgramme, a un moment donr^.Quatrecnrc«>metres 
sont ainsi disponibles, chacun pouvant fetre associ£ a un sous-programme. 

ApitsecouleriH*tdud61aispd^^ 
seraitr^uneinstructionGOSUB.Alafmdusous-programnieaawnimaDdeRH 

la reprise du programme principal a l'endroit meme de Interruption. 

t „ ™mm*n^ EVERY oermet a un programme en BASIC de rappeler des sous-programmes ^et 

associe & un sous-programme. 

Les chronometres possedent difrerentes priorites d'interruption. Le chronometre 3 correspond a 
{r^^retTcbxonomfetxe oTla priority mferieure. (Pour de plus ample* renseigne- 
ments, coasultez le chapitre "Pour information...*'). 

10 MODE t:n-14:x=RND*400 

20 AFTER x,3 GOSUB 80 

30 EVERY 25,2 GOSUB 180 

40 EVERY 10,1 GOSUB 170 

50 PRINTTestez vos r6ftexes" 

60 PRlNT"Appuyez sur la barre espace." 

70 IF flag-1 THEN END ELSE 70 

80 z-REMAIN(2) 

90 IF INKEY(47)~1 THEN 110 

100 SOUND1 .OOOPRtNT'Trfcheur T:GOT0 150 

110 SOUND 129,20:PRINT"MAINTENANT":t-TIME 

120 IF INKEY(47)-1 THEN 120 

130 PRINT "vous avez mis"; 

140 PRINT (TIME^)/300:"secondes' 

150 CLEAR INPUT:flag-1 .RETURN 

160 SOUND 1,0,50:PRINT'.";:RETURN 

170 r»-n+1:IF rc>26 THEN n-14 

180INK1,n:RETURN 



Avosheurescteloteir.. 



Les commandes AFTER et EVERY peuvent intervenir a tout moment ponr rfinitiaHser le 
sous-programme concern^ eo accord avec le chronomfetre. Ces deux commandes se partagent les 
chronometres, une commande AFTER annulant toute commande EVERY anteneure pour un 
cfaronometre dorro6 et inversement 

Les commandes Dl et El d6sactivent et activent les interruption de chronometre tout en permettant 
l'execution des commandes les separant Une interruption de priority elevee est ainsi dans 
Pimpossibilite' de perturber le deroulement d'une interruption de priority moindre. La fonction 
REMAIN desactive le comptage d'un des chronometres et restitue le nombre d'impulsions 
restantes avant le declenchemeut de Interruption, 

Utilisation des donnies... 

Dans un programme necessitant l'entree d'un meme ensemble d'informations des led6but, il serait 
judicieux de pouvoir entrer toutes les valeurs une fois pour toutes. C'est le r61e des commandes 
READ et DATA. READ est tres similaire a INPUT dans le sens ou elle affecte des valeurs a des 
variables. Elle en diflere cependant par le fait que ces valeurs soot lues a partir des commandes 
DATA au lieu d'etre entrees au clavier. En voici deux exemples : 

10READa,b,C 

20 PRINT "les nombres sont";a;"er ;b; B et,c 

30 DATA 12,14,21 

run 

10 INPUT "Entrez 3 nombres s6par6s par une virgule";a,b,c 

20 PRINT'les nombres sorrt";a;"ef ;b; H et;c 

run 

Des virgules separent les differents elements d'une commande DATA, tout comme pour la 
commande INPUT. 

Outre des valeurs numeriques, les commandes DATA peuvent contenir des constantes alpnanu- 
menques: 

10DIMa$(10) 

20FORJ-0TO9 

30 READ a$(i) 

40 NEXT 

50FORi-0TO9 

60 PRINT s$(i); n H ; 

70 NEXT 

80 DATA rien,ne,sert,de,courir,il,faut,parur,a,poirrt 

run 

Bien que la commande DATA comporte des chames, celtes-d ne se trorrventrmentregoillemets. 
L'emploi des girillemets est en effet facultatif pour la commande DATA, comme lors de l'entree 
d'une cname en reponse a une commande INPUT. lis sont cependant trts utiles lorsque les chataes 
de donnees contiennent elles-memes des virgules. En cas d'omission, l'instruction READ 
mterprtterait ces virgules comme les virgules conventionnelles de la commande DATA, coupant 
ainsi la cnatne en plusieurs troncons. 
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10 READ a$ 

20 WHILE a$o"* w 

30 PRINT a$ 

40 READ a$ 

50 WEND 

60 DATA J'ai longtemps, habite, sous de vastes portlques 

70 DATA Que, des, soleils marins, teignaient, de mills feux 

80 DATA * 

run 

La chalne de la ligne 60 comporte des virgules entralnant la lecture et l'affichage de chaque partie. 
Par cootre, la chalne de la ligne 70 est delimitee par des guillemets, et sera done af fichee somme 
un tout 

L'exemple ci-dessus montre que tes donnees petrvent ocenper plusieurs lignes. READ traite les 
lignes de haul en bas dans l'ordre des numeros de ligne (60, 70, 80, etc.). Par ailleurs, les 
instructions DATA peuvent se trouver n'importe ou dans le programme : avant ou apres la 
commande READ qui extrait les informations. 

Si un programme contient plusieurs commandes READ, la seconde reprend la ou la premiere 
s'arrfite: 

10 DATA 123,456,789,321,654,2343 

20 FORM TO 5 

30 READ nomb 

40 total=total+nomb 

50 NEXT 

60READtotal2 

70 IF total-total2 THEN PRINTIes donnees sont justes" ELSE PRINT"!! y a 

une erreur dans les donnees" 

run 

Essayez de modifier la ligne 1 en introduisant une erreur dans 1 'un des cinq premiers nombres, 
puis lancez le programme. Cette methode d'insertion, a la fin d'une commande DATA, d'une 
valeur supplementaire 6gale a la somme de toutes les autres valeurs constitue un bon moyen de 
detection d'eventuelles erreurs, surtout lorsque les lignes DATA sont nombreuses. Cette mdthode 
s'appelle somme de contrOle (checksum). 

Si un programme fait appel a des donnees mixtes (cbalnes et nombres), U est possible de les 
combiner dans les instructions DATA et READ, a condition que les elements soient lus correc- 
tement Par exemple, si DATA contenait des sequences de deux nombres suivis d'une chalne, seul 
Femploi d'une commande READ suivie de deux variables numenques et d'une chalne serait 
justifie" : 
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10DIMa(5),b(5),p$(5) 

20 FOR i-1 TO 5 

30 READ a(f),b(i),p$(i) 

40 NEXT 

50 DATA 1,7,fred,3,9,francojs,2,2,dany,4,6,olivier,9,1, eric 

60 FOR i-1 TO 5 

70 PRINT p$(i),":";a(i)*b(i) 

80 NEXT 

Vous pouvez, pour changer, separer les differents types de donnees : 

10DIMa(5),b(5),p$(5) 

20FORi=1TO5 

30 READ a(i),b(l) 

40 NEXT 

50 FOR i-1 TO 5 

60READp$(i) 

70 NEXT 

80 DATA 1,7,3,9,2,2,4,6,9,1 

90 DATA fred,francois,dany,ollvier,eric 

100 FOR i-1 TO 5 

110 PRINT p$(1),"; u ;a(i)*b(i) 120 NEXT 

Si la boucle FOR de la Ugne 20 se change en : 

20 FOR 1-1 TO 4 

, . .les deux premiers essais de lecture des chalnes a la ligne 60 donnent alors "9" puis "1". Bien 
qu 'elles soient valides, ces valeurs ne reprgsentent pas vraiment le rtsultat attendu ! Pour obtenir 
les valeurs souhaitees, il raudrait introduire dans le programme les commandes : 

15 RESTORE 80 
45 RESTORE 90 

La commande RESTORE place le pointeur-lecteur de DATA a la ligne specified et peut ainsi 
servir dans une commande conditionnelle pour lire certains blocs de donnees selon des criteres 
donn6s. De cette maniere, dans un jeu a plusieurs niveaux posseo"ant piusieurs ecrans, les donnees 
de chaque ecran pourront etre extraites en fonction d'une variable (leur niveau, par exemple). 
Voici un programme de ce type : 
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1000 REM section de dessin sur ecran 

101 IF niveau-1 THEN RESTORE 2010 

1020 IF niveau-2 THEN RESTORE 2510 

1030 IF niveau=3 THEN RESTORE 3010 

1040 FOR y-1 TO 25 

1050 FOR x-1 TO 40 

1060 READ char 

1070 LOCATE x,y: PRINT CHR$(char); 

1080 NEXT x,y: 

2000 REM DATA pour Pecran 1 

2010 DATA 200,190,244,244,210 ...etc 

2500 REM DATA pour I'ecran 2 

2510 DATA 100,103,245,243,251 ...etc 

3000 REM DATA pour I'ecran 3 

3010 DATA 190,191,192,193,194 ...etc 

Les commandes DATA, READ et RESTORE peuvent egalement etre Wastries par un pro- 
gramme musical. Les periodes sooores sont lues (READ) dans les commandes DATA tandis que 
RESTORE relance une section en ramenant le pointeur au de"but d'une partie donnee du 
programme: 

10 FORM TO 3 

20 RESTORE 100 

30 READ note 

40 WHILE noteo-1 

50 SOUND 1,note,35 

60 READ note 

70 WEND 

80 NEXT 

90 SOUND 1,142,100 

1 00 DATA 95,95,1 42,1 27,1 1 9,1 06 

110 DATA 95,95,119,95,95,1 19,95 

120 DATA 95,142,119,142,179,119 

130 DATA 142,1 42, 106, 11 9, 127,-1 

run 



I 
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Des sons k votre port§e... 

Panni les fonctions du 6128/464, les commandes de sot et d'enveloppe vous parattront prob- 
ablement les plus obscures a premiere vue. H n'y a absolument pas de quoi. Avec un peu 
d 'entralnemeot, vous serez capable d 'obtenir toute une gamme d'effets sonores differents et meme 
de composer des harmonies. 

Commencons par les quatre premieres parties de la commande SOU N D : numero decanal, periode 
sonore, duree de la note et volume. Vous vous demandez petit-fitte quelles valeurs chaque nombre 
peut prendre? 

Pour le moment, nous laisserons la premiere partie (numero de canal) de cote\ car ce n'est pas la 
plus simple. La periode sonore peut prendre les valeurs a 4095, mais seules quelques-unes de 
ces valeurs correspondent k des notes de musique (elles sont listees dans la partie 5 du chapitre 
"Pour information..."). Ainsi, le nombre 239 correspond au Do memum et 253 a la note situee 
juste en-dessous : le Si. Mais le son obtenu avec les valeurs 240 a 252 ne correspond h aucune des 
notes du piano. Aucune note n'est jouee lorsque la periode est fixee a 0, ce qui nous sera bien utile 
lorsque nous passerons au "bruit" (voir plus loin). 

La troisieme partie de la commande SOUND fixe la duree de la note en centiemes de seconde. 
Les valeurs admissibles se situent entre 1 et 3276? (inclus). Toutefois, pour une valeur nulle (zero), 
la duree de la note est detenninee par 1'enveloppe selectionnee (on y reviendra). Une valeur 
negative indique qu'il fautr6p6ter 1'enveloppe le nombre de fois specific. Ainsi, -3 signifie ' repete 
renveloppe de volume 3 fois" (nous y reviendrons egalement plus tard). 

La quatrieme partie de la commande est le volume. II prend les valeurs a 15 (12 par defanf). 
Dans les sons que nous avons entendus jusqu'a present, le volume etait constant pendant toute 
rexeculion de la note. Lorsque la note est modulee par une "enveloppe de volume", la valeur 
indiquee dans la commande SOUND concerne le volume au depart de la note. 

Voyons maintenant le numero de canal Autant vous dire des a present qu'il correspond a un 
Dombre binaire - il va done vous falloir enidier un peu les nombres binaires afin d'en comprendre 
la signification (voir la premiere partie de ce chapitre). 

Vous avez le choix entre trois canaux pour jouer un son. Si votre ordinateur est connecte i un 
■nplificateur stereophonique, Fun des canaux va sur la sortie gauche, l'autre sur la sortie droite 
et le troisieme sur les deux a la fois (au milieu). Les numeros suivants soot utilises pour indiquer 
le canal sur tequel une note doit etre jouee : 

1 canal A 
2canalB 
4canalC 
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Lorsque vous desirez jouer sur plusieurs canaux, il vous suffit d'additionner les numeros des 
canaux desires. Ainsi, pour jouer sur A et C, vous indiquerez 1+4=5. 

SOUND 5,284 

Vous vous demandez certainement pourquoi on a attribu6 au canal C le numero 4 au lieu de 3. 
Cela tient au fait que Ton n'a utilise" ici que des puissances de 2 (l=2t0, 2=2tl, 4=2t2), si bien 
que leurs combinaisons ont la structure d'un nombre binaire. Dans un nombre binaire de trois 
cbiffres, cnacun des chifftes peut prendre les valeurs Oou 1, determinant ainsi l'6taten service ou 
hors service du canal correspondant Ainsi, dans notre exemple : 

5 en notation decimale equivaut & 1 * 4+0*2, done 101 , en notation binaire. En associant un chiffire 
binaire a chaque colonne A, B ou C on obtient : 

CBA 
101 

En d'autres termes, lecanal C est en service, le canal B est hors service et le canal A est en service. 
Si Ton desire jouer une note sur les canaux A et B, il faut indiquer : 

CBA 

01 1 

Le nombre binaire 01 1 correspondant a 0*4+1*2+1*1=3, la commande SOUN D prend la forme: 

SOUND 3,142 

Naturellement, on obtient exactement le meme resultat en additionnant simplement les numeros 
de canal (souvenez-vous que A*=l, B=2 et C=4). Le numero a indiquer pour jouer sur les canaux 
A et B est done bien 1+2-3. 

Ne vous inquietez surtout pas si vous n'avez pas compris cette demonstration. La seule chose 
vraiment importante a retenir pour cboisir une combinaison de canaux est I'addition des numeros 
decanal. 

Helas, 1, 2 et 4ne sontpas les seuls parametres de numero de canaLLesvaleurs8,16et32peuvent 
egalement fttre utilisees, afin d'indiquer qu'un son produit sur un canal a rendez-vous avec un 
autre canal (A, B et C respectivement). Qu' en tendons-nous par rendez-vous ? C'est tres simple : 
les sons que nous avons fabriqu6s jusqu'a present etaient immddiatement jou6s sur le canal 
indique*. Essayez done ce qui suit : 

SOUND 1,142,2000 

SOUND 1,90,200 
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A moins d'fetre partknulerement lent au clavier, vous avez constate" que vous aviez le temps de 
taper la seconde commande avant que la premiere n'ait fini de s'executer. Ceci est dfl au fait que 
le mode sonore est capable de maintenir jusqu'a 5 commandes SOUN D en file d'attente pour un 
meme canal. Supposons que nous dCsirions jouer un son sur le canal A, puis deux sons simultan6s 
sur les canaux A et B. II faudrait bien trouver un moyen d'indiquer a rordinateur qu 'il ne doit pas 
emettre le son du canal B avant que le canal A ne soit pr6t a entamer sa seconde note. C'est alors 
qu'intervient la notion de rendez-vous, que Ton obtient de deux facons differentes : 

SOUND 1,200,1000 
SOUND 3,90,200 

La seconde note est ici dirigee sur A et B, elle ne peut done etre jouee qu'apres la fin de la note 
du canal A. On fait ainsi attendre une note jusqu'a ce que les canaux qu'elle doit utiliser soient 
libres. Inconvenient Evident : le meme son sera dirig6 surchacun des canaux (le son ,90;200, dans 
notre cas, est joiie" par A et B). Void Tautre mgthode : 

SOUND 1,200,2000 
SOUND 1+16,90,200 
SOUND 2+8,140,400 

Dans cet exemple, on fixe a la seconde note de A un rendez-vous avec la note de B (et a la note 
de B un rendez-vous avec celle de A). L'avantage est clair : les deux notes pourraient etre 
differentes, elle seraient neanmoins liees de sorte qu'aucune ne pourrait etre tisise sans que les 
deux canaux ne soient libres. Voila done ce qu'on appelie un rendez-vous. La encore, la 
signification de ces valeurs n'apparatt qu'en binaire : 

8=2T3,16=2t4,et32=2t5. 

Nous pouvons done maintenant nous representer le numero de canal sous la forme d'un nombre 
binaire dont les chiffres portent les titres suivants : 

Jouer Jouer Jouer 
C B A 

Ajout4 Ajout2 Ajoutl 

Ainsi, pour jouer sur C une note ayant rendez-vous avec A, vous specifiez : 

1 10 

C'est-a-dire le nombre 1 100, correspondant en decimate 4 8+4-12. 

Le nuntero de canal 12 indiquera done a l'ordinateur qu'avant de jouer une note sur le canal C 11 
doit attendre la note du canal A avec laquelle ii a rendez-vous. 



RDVavec 


RDVavec 


RDVavec 


C 


B 


A 


Ajout 32 


Ajout 16 


Ajout 8 



\ 
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Si 1'on ajoute au uuntfro de canal te nombre 64 (2t6), r-*^ 1 ^^^]^?"- 
Cette valeur indique en effet que la note n'est Uberee que lors d'une commande RELEASE. 

Enfin, si l'ou ajoute 1 28 (2t7), la file d'attente du canal indiqud est annulee. Vous pouvw uj^or 

SOUND 1 ,248,30000(ce son dureratt cinq minutes, mais) 
SOUND 1+128,0 (le raccourcit) 

En mode direct, le moyen le plus rapide d'arreter un son est d'appuyer sur la louche [DEL] en 

SbSdeli^lesignisonored'avertiss^m^ 

Maintenant que vous savez dinger un son sur Tun des trois canaux (en fixant au besoin des 
SrvTus^ous aLeriez cerLement apprendre a produire des sons un peu plus n^lodieux 

q?etu^^^ 

Slttribuer au son une enveloppe, c'est-a^lire un modele deTuiissant la variation du volume en 

u^ernaintient imcertam temps a^^ 

de reproduire cette dynamique sonore au moyen de la commande SOUND. On utilise pour cela 

la commande associee ENV. Commencons par un exemple ties simple : 

ENV 1,5,3,4,5,-3,8 
SOUND 1,142,0,0,1 

La commande ENV est specifiee avant la commande SOU N D a laquelle ^^^ j*£ 
um^r une enveloppe aJec la commande SOUND, on todiquera son numero au cinqu.eme 
pStTde cette demiere (dans 1'exemple ci-dessus, nous avons Choi* 1*™JW™£^ 
L?memier parametre d'une commande ENV est son numero. Du fait que la commande ENV 
*dEi duree et l'intensite d'une note, on fixera a les parametres de la cornrnande SOUND 
2'oi L'enveloppe ci-dessus definit une augmentation de volume en cinq pas corre- 

SuTen 5 pas^Tunites et de 8 centimes de seconde. Ainsi, le premier nombre, ou ^numero 
Sl^UsTsuivi de deux groupes de trois nombres. A 1'interieur d'un g»V|^«« »» 
nrcmier nombre indiquant en combien de pas s'effectuera l'augmentation ou la dirmmmon de 
v?lu^ unTulieJlndiquantla variation devolumeau cours de chaque pas, et le troisieme la 

duree de ces pas. 



P^SKMChacitreS A vos heures de loisir... 



ENV 2,5,-2.1,20,0,1,10,1,1 
SOUND 1,248,0,15,2 

Il^f d6crotten5 P M * -2. D dumnue done de 2 a chaque pas d'un cenriemedesecmMte Le 

done constant) .U encore, la durted 'no pM^tde 1 centitode^dluS^^f 
^fio^c^dlOsegn^ 

Commeta commande SOUND indique un volume iiiitial de 15, ce oenuer s« done de 5 aorta 

te pren^ ^mem, d rcstera a ce niveau pendam 20 centi^ 

jusqu'a 15 an coins dn dernier segment <Je rewdoppe. remonter 

a^repre^on cWfl&ec de Tenveloppe vous semble trap abstraite, cela vous aidera 
o^co.imiandeENV.Vmalareprt.^ntation grapMqoedes deux enveloppesdefinies jusqu'a 



V«t«ioo d» voftjnw 



• i » ; 

NOMBRE D'ETAPES 5 

VARIATION PAR ETAPE 3 

DUREE PAR ETAPE 4 



t/KXTMcomto 



NOMBRE D'ETAPES 5 

VARIATION PAR ETAPE -3 

DUREE PAR ETAPE 8 
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Crnnltm A Pan* x>r 



Variation 
de volume 



1 1 3 4 f « 7 




norrtbf® 

d'etaoa* 

5 

variation par 

atape -2 

durfte par 

etaoe 1 



NOMBRE OETAPES 20 
VARIATION PAR ETAPES 
DUREE PAR ETAPE 1 



Une envelope pouvantcontenirjusayacinq segments detrois valeurscnacun, 1 'instruction ENV 
peut done utiliser un maximum de 16 parametres (en comptant le numero d'identification de 
renvetoppe, compris entre 1 et 15). Loraque les variations de volume inchquees excedent les 
limites d'intensite" autorisees (entre et 15), la valeur de l'intensite boucle sur eUe-meme, si bien 
que la premiere valeur depassant 15 correspond au volume et la premiere au-dessous de 0, au 
volume 15 : 

ENV 3,9,5,20 
SOUND 1 ,,142,0,0,3 

Cette enveloppe ties simple ddfinit 9 pas au cours desquels le volume augmente de 5 en 5 pour 
une duree de 20 centiemes de secondes chacun. Le volume atteint leniveaulSalafindutroisierne 
pas, si bien que la variation suivante amene celui-ci a 4, la suivante a 9 etc... Void, sous forme 
graphique, 1'effet produit par cette commande : 
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Variation 
de volume 



90 



»0 



too 



no 



NOMBRE O'ETAPES 9 
VARIATION PAR ETAPES 5 
DUREE PAR ETAPE 20 



Le nombre des pas peut varier de a 1 27 et leur amplitude de -128 a +1 27 (une valeur n6gative 
correspondant a une dirninution de volume). La duree des pas peut prendre des valeur allant de 
)a255. 

Nous savons maintenant modeler a volonte renveloppe de volume. Voyons a present comment 
ouer sur la hauteur de la note pour creer, par exemple, un effet de vibrato, c'est-a-dire une note 
scillant autour de la note donnee. 

La procedure a suivre ressemble beaucoup a celle de l'enveloppe de volume. On utilise la fonction 
ENT, dont voici un exemple. 

ENT 1,5,1 ,1,5,-1,1 

SOUND 1,1 42,1 0,1 5„1 

.£ numero d'enveloppe de tonalite consume le sixieme parametre de la commande SOUND. La 
ncore, la commande ENT doit intervenir avant la commande SOUN D. 
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La commande ENT de ce premier exemple precise que l'enveloppe numero 1 est compost £ 

Sau contraik elle est plus longue, la fin de la note ne subira ^J"™^****' ^ 
M dgakment valable looque Fenveloppe de volume determine la dure* de la note. 

(Remarquez egalement 1'absence du parametre "enveloppe de volume", cede enveloppe n'etant 
pas creee pour notre exemple). 

La duree de l'enveloppe de tonalite est, dans la plupart des cas, beaucoup plus courte que cdte de 
h S?S? indiqueXrs qu'elle doit se repnrtuiie jusqu'* la fin de * note eu c^ssamun 
numero d'enveloppe ndgatif. Le parametre utilise dans la commande SOUND est le-mnlm 
positif correspondant : 

ENT -5,4,1 .1,4,-1,1 j 

SOUND 1,1 42,1 00,12„6 * 

La chute de frequence que vous avez constatee provient du faitque ^ *P^,£ 
Enveloppe au^mente la periode de la note de 3 unites, ce qui se pmduit 30 fois (90 divise par 
trois). Cette caracteristique permet des effets de sirene ou de gazouiUement 

ENT -7,20,1 ,1,20,-1,1 
SOUND 1,1 00,400,1 2„7 

ENT -8,60,-1,1 ,,60,1,1 
SOUND 1,1 00,480,1 2„8 

On neut definir ainsi iusqu'a quinze enveloppes numerotees de 1 a 15, en utilisant les valeurs 
S^^S^po^Siir la petition de l'enveloppe. Le nombre de pas. premier 
nSne^Sue groupeTpeut varier entre et239. L'amplitude du pas prend, corntne pour 
TcolSeEN^ 

fl est possible d'ajouter un dernier parametre a la commande SOUND : le niveau de bruit que 
ne d*pTe que cTuo canal et que, de ce fait, chaque nouvelle penode recouvrera la precedente. 

Onpeututiliserunbrnitsoitenlerne^^^ 

donnant a la periode sonore (deuxieme parametre de la commande SOUND) la valeur 0. C est 

ainsi que Ton reproduit les effets de percussions. Essayez par exemple : 

ENT -3,2,1 ,1,2,-1,1 | 

ENV 9,15,1,1 ,15,-1,1 _,™-r ) 

FOR a=1 TO 10: SOUND 1, 4000,0,0,9,3,1 5:NEXT | 

Vous constatez que ces instructions, elements de depart pour 1* arnolatioo d'un bruit de tram, 

combinent le bruit avec les deux types d' enveloppes. 

: I 
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Les parametres de duree et de volume etsnt fixes a dans la commande SOUND, ces deax 
caractdristiques sont done d6terminees par 1'enveloppe de volume. 

Si l'utilisation des commandes SOUND, ENV et ENT est parfaitement claire pour vous, nous 
allons pouvoir aborder les diff£rentes commandes et fonctions qui leur sont associees. 

Lorsque nous parlions du numero de canal de la commande SOUND, nous avions dit qu'en lui 
ajoutant le nombre 64 on retenait le son dans une file d'attente, jusqu'a ce qu'il soit Ub6r€ par la 
commande RELEASE. Le mot cle" RELEASE est suivi d'un nombre correspondant au bit 
significant de celui des trois canaux que vous d6sirez liberer. La seule chose importante k retenir 
est que: 

4 designe le canal C 
2 designe le canal B 
I designe le canal A 

. . .et que vous obtiendrez la liberation de pmsieurs canaux a la fbis en additionnant les nombres 

correspondants. Ainsi, pour liberer les sons retenus sur les trois canaux, on indiquera : 

RELEASE 7 

... le nombre 7 etant 6gal a 1 + 2 + 4. L'ordinateur ne tient pas compte d'une commande 
RELEASE si aucun des canaux ne se trouve bloque\ Essayez maintenant : 

SOUND 1+64,90 

SOUND 2+61,140 

SOUND 4+64,215 

RELEASE 3: FORM 10 1000:NEXT:RELEASE4 

Its sons dCfinis par les commandes SOUND ne sont produits qu'au moment oil la premiere 
commande RELEASE libere les canaux A et B. Le son retenu dans le canal C est libere a la fin 
ic la boucle d'attente. 

Z exists encore un autre moyen d'obtenir tin rendez-vous de plusieurs sons. Lorsqu'un son est 
^3c6 en file d'attente dans un canal a l'gtat bloqufi (numgro de canal + 64), ce demier retiendra 
**akment tous les sons dirig6s ensuite sur cette file. Si plus de quatre sons suppiementaires sont 
twites a cette merne file, la machine effectue une pause sous la forme, par exemple, d'un sous- 
rrogramme appele" aprfes un laps de temps determine par la commande AFTER ou EVERY. Cette 
:*ibode est done k dgeonseilleren mode sonore, puisqu'elle provoque uoe pause du programme 
nts qu'une file se trouve surchargee. On rencontre le meme inconvenient lorsque de nombreux 
cos de longue duree sont accumules a un rythme trop rapide. Voyez plutot : 

10FORa-1TO8 

20 SOUND 1,1 00*a,200 

30 NEXT 

40 PRINT"bonjour" 

run 

■ «t constatez que le mot "bonjour" ne s'affiche qu'au bout d'un certain temps, aprfes execution 
as mm premiers sons. Ce retard tient au fait que l'execution du programme ne peut continuer 
mi 4§'uoe place ne s'est pas lib6rte dans la file. 
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Le BASIC possede un m6canismed'intemiption assez 8imflaircaceliriqu'utili!^tk»ccHnmandes 
AFTER EVERY ou ON BREAK GOSUB. H donne acces a un so us -programme d'emission 
souore qui n'est appeie que lorsqu'une place se libere dans la file demandee. En void un exemple: 

10a-0 

20 ON SQ(1) GOSUB 1000 

30 PRINT a; 

40 GOTO 30 

1000a-a+10 

1010SOUND1,a,200 

1020 IF a<200 THEN ON SQ(1) GOSUB 1000 1030 RETURN run 

Ce programme, comme vous pouvez le constater, n'effectue jamais de pause. La cormnande 
SOUND n'est appelee que si la file d'attente du canal A (numero 1) contient une place libre, ce 
que la commande ON SQ(1) GOSUB est chargee de verifier a la ligne 20. Cette commande 
initialise un mecanisme d'interruption qui appelle le sous-programme sonore lorsqu un espace 
libre apparatt dans la file. La commande ON SQ GOSUB doit etre reinitialise apres appel du 
sous- programme, ce qui fait la ligne 1020. Dans notre exemple, le sous-programme sonore se 
reinitialise tant que "a" est irdeneur a 200. 

n est possible de demander a l'ordinateur de jouer une musique de fond tout en executant un 
programme complet (deplacement d'objets a l'ecran, calculs etc...). n suffit pour cela jfc faire 
jouer les notes par un sous-programme qui sera appeie seulement lorsque la file d attente 
comportera une place libre. Le programme n'effectuera jamais de pause en attendant qu une place 
se Ubere. En foumissant les notes a ce sous-programme sous forme destructions DATA, il serait 
ties simple de lui faire cesser de se reinitialiser juste avant de lire la derniere donnee. 
Lenombre place entre les parentheses de la commande ON SQ() GOSUB est l,2ou 4selon le 
canal dont la file d'attente doit etre sollicitee. 
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a exiate one (taction SQ( ) pc rm e tt a ot d'mterroger rftat d'un canal sonoje donne\ qu'on 
J&signera de mfime par le nombrc 1, 2 ou 4. Cette fonction restitue un nombre dont cbaque bit 
x>rte une signification et dont l'lnterpretation necessite quelques connaissances des nombres 
-■tnaires. Les bits contenus dans les valeurs obtenoes ont la signification suivante : 



3IT 


DECIMAL 


SIGNIFICATION 


X12 


1,2,4 


Nombre de places libres dans la 
file 


3 


8 


Rendezvous avec A pour la 
note en tfite de file 


l 


16 


Rendez-vous avec B pour la 
note en tfite de file 


< 

■ 


32 


Rendez-vous avec C pour la 
note en tete de file 


A 


64 


File bloquee 





128 


Une note en eours d 'execution 



• yyxms un exemple ties simple : 

10 SOUND 2,200 
20 x-SQ(2) 
30 PRINT BIN$(x) 
run 

r aomfare binaire obtenu (10000100) contient le bit 7 indiquant que le canal Ctait en activite au 
^axat oo la fonction SQ a 6t6 utilisee. Les trois derniers chiffres (100) correspondent au nombre 

x-omal 4 : il reste done quatre places libres dans la file, Cette fonction permet de connatlre I'etat 
ase file a un point donn6 du programme, alors que ON SQQ GOSUB interroge celui-ci, puis 

-.apt en consequence a un moment imprevisible. 

-n toemples cites jusqu 'a present ne pre" voyaient remission que d'une, voire deux notes a la fois. 
- '=s allons maintenant considerer la possibility de manier des ensembles de notes independantes 
r-. jaes des autres (un morceau de musique, par exemple en les entrant sous forme d'une 
irmande DATA lue (READ) par la commande SOUND. 

10 FOR octave— 1 TO 2 

20 FOR x-1 TO 7:REM notes par octave 

30 READ note 

40 SOUND 1 ,note/2Toctave 

50 NEXT 

60 RESTORE 

70 NEXT 

80 DATA 426,379,358,319,284,253,239 

wn 
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Notre dernier exemple de programme sonore montre ce <ni'il est possible de realiser a partir de 
ces 61ements. Un rythme et une melodie sont joues sur les canaux A et B synchronises au moyen 
de rendez-vous. L'exemple montre comment introduire dans une instruction DATA des informa- 
tions concemant les notes, les octaves, les durees et les rendez-vous : 

i 1 o REM ligne 1 80 donne la clef de SOL 
f - 20 REM ligne 1 90 donne la clef de FA 

30 DIM gamme%(12):FOR x%-1 TO 12:READ gamrne%(x%):NEXT 

40 ca1%-1:READ ca1$:ca2%-1:READ ca2$ 

50CLS 

60vrl%-12 

70 gamme$-" a-b b o+c d-e e f +f g+g 

80 ENV 1,2,5,2,8,-1,10,10,0,15 

90 ENV 2,2,7,2,12,-1,10,10,0,15 

1 00 ENT -1,1 ,1,1 ,2,-1 ,1,1 ,1,1 

110 DEF FNM$(s$,s)=MID${S$,S,1) 

120ca1%='1:GOSUB200 

130ca2%-1:GOSUB380 

140 IF ca1%+ca2>%0 THEN 140 

150 END 

180 DATA &777,&70c,&6a7,&647,&5ed;&598 

170 DATA &547,&4fc,&4b4,&470,&431,&3f4 

1 80 DATA 4cr4f4f 1 f 1 g1 a1 -b2c2f 4g2g1 a1 -b6a2cr1 f1 g1 a1 -b1 a1 -b2c2 

g2a2g2f 1 gi a2g2f6e2c2e2c2g2e2c1 -b1 a2g2f4e4d8c413f1 c2d4-b2fr2- 

b2a2g2f6e2gr4c4-b1a1fl-b1g2c2-b4z4h4gt6z2z2^4b2ar2-b2a2g2t6e2g4c4- 

bla1fl-b1g2c2-b4a4g8f 

1 90 DATA r4f4f8f4e4c4fr8f4e2f2e4d2e2d8c8c6e2f4g4g8e4f3f1c4di 

8g4cr4e4c6f2d4c4c8f2d4c4c8fr8-e4dr8g8c4e4c6f2d4c4c8f 

200 REM envoi le son sur le canal A 
210p1$-FNM$(ca1$,ca1%) 
, 220IFp1$oVTHENr1%-0:GOT0 240 

230 r1 %-1 6:ca1 %-ca1 %+1 :p1 $-FNM$(ca1 $,ca1 %) 

240 IN p1$-V THEN ca1%-0:RETURN ELSE L1%=VAL(p1$) 

250ca1%-ca&%+1 

260 n1$-FNM$(ca1$,ca1%) 

270ca1%-ca1%+l 

280 IN n1$-"+ H OR n1$-"-" THEN 350 

290n1$~ n,, +n1$ 

300 ndl%-(1+1 INSTR(gamme$,LOWER$(n1$1)))/2 

310 IF ASC(RIGNT$(n1$,1))96 THEN o1%-8 else o1%-16 

320 SOUND n-r1%,gamme%(nd1%)/o1%,vrt%*1 1%,1 ,1 

330ONSQ(1)GOSUB200 

340 RETURN 

350n1$-n1$+FNM$(ca1$,ca1%) 

360 ca1%-caiy<H-l :; re ; '■:■-: ? ■ ■ .^W 1 - 

370 GOTO 300 

380 REM envoie le son sur le canal B 



Jr 
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390 p2$-FNM$(ca2$,ca2%) 

400 IF p2$oV THEN r2%-0:GOTO 420 

410 r2%-8;ca2%-ca2%+i :p2$-FNM$(ca2$,ca2%) 

420 IF p2$-V THEN ca%-0:RETURN ELSE 12%-VAL(p2$) 430 

ca2%-ca2%+i 

440 n2$-FNm$(ca2$,ca2%) 

450 ca2%-ca2%+1 " ^¥ 

460 IF n2$-*+ H OR n2$-"-" THEN 530 

470 n2$- M "+n2$ 

480 nd2%-(1 +INSTR(gamme$,LOWER$(n2$))/2 

490 IF ASC (RIGHT$(n2$,1))96 THEN 02%-4 ELSE o2%-8 

500 SOUND 2+2r%,gamme%(nd2%)/o2%,vtt%*12%,0,2 

510ONSQ(2)GOSUB380 

520 RETURN 

530 n2$-n2$+FNM$(ca2$,ca2%) 

540 ca2%-ca2ycri-1 

550 GOTO 480 

run 

Si nous padlons graphlques ? 

La partie qui suit ett consacree aux fonctions graphiques , dont nous allons, a partir d'un premier 
exemple, decouvrir tout a tour les points essentiels. 

Mous allons commencer par partager l'ecran en deux : une fanftre de texte Oigne 40) et une fenfilre 
srapbique (ligne 30). Puis nous cboisirons un MODE, ainsi que deux couleurs clignotantes (ligne 
20). 

10 REM MASK et TAG dans lestenetres :10 

20 MODE A-JNK 2,10,4:INK 3,4,10 

30 ORIGIN 440,1 00,440,640,1 00,300 

40 WINDOW 1,26,1 ,25 

50CLG2 

En executant ce programme, vous allez voir apparattre un carre" clignotantan milieu delamoitie' 
rroite de recran. La ligne 50 attribue a ce carre" Tencre numero deux (bleu sombre et rose 
Jternes). La Kgne 30 positionne le point d'origine des coordonnees sur le coin inKrieur gauche 
■m carre tandis que la commande MODE y place le curseur (X-4L Y=0). On pent maintenant 
ncer une diagonale a l'aide de la ligne 60 : 

60 DRAW 200,200,3 

-z&utez le programme, puis ajoutez la ligne suivante : 

80MOVE0,2:FILL3 
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La ligne 80 pose le curseur graphique a 1'interieur d'une de* moities du cant, qu'elle colore au 
moyeo de l'encre 3. Les limites de ce coloriage sont le bord de la fenfitre (qui est aussi celui de 
notre cane) et tout 61ement graphique trace par le stylo graphique utilise (le 3) ou pour lequel on 
a indiqu6 la meme encre que celle du remplissage (la numero 3 egalement). 

Executez le nouveau programme : 

Venfiez ce qui a 6t6 dit a propos des limites de coloriage, en ecrivant la ligne 70. 

70 GRAPHICS PEN 1 
run 

Remarquez bien que si l'encre de la diagonale n*6tait pas la meme que celle du coloriage, c'est le 
carre" tout entier qui seraitcolorie\ ce que vous pouvez verifier en rempla^ant FILL 3 par FILL 1 
dans la ligne 80. Revenez ensuite a l'6tat initial (FILL 3). 

Dessinons maintenant un cadre : 

100 MOVE 20,20 
110 DRAW 180,20 
120 DRAW 180,180 
130 DRAW 20,1 80 
140 DRAW 20,20 
run 

L'encre 1 du cadre a 616 indique" par la ligne 70. Si ceDe-ri n'existait pas, il nous faudrait ajouter 
l'indication ",1", soit comme troisieme parametre de la commande MOVE en ligne 100, soit 
comme troisieme parametre de la commande DRAW en ligne 110. L'ordinateur saurait alors 
qu'il Iui faut changer de stylo graphique. 

Du point a la ligne... 

Une ligne peut etre pleine, ou en pointiltes. La commande MASK permet de d6terminer la taille 
des pointilles. On deTinit pour cela une sequence se reproduisant tous les huit pixels et se 
poursuivant ainsi de ligne en ligne. II est possible de revenir au debut de cette sequence par 
rintermediaire d'une nouvelle commande MASK reprenant les mfimes parametres. 

La sequence est representee au moyen d'un octet dont la disposition interne determine Fempla- 
cement de 1'encre. Nous utiliserons dans notre exemple un nombre binaire constant (indiqu6 par 
le code &X) pour dCfinir un segment dont seuls les quatre pixels centraux seront dessines, les deux 
pixels de chaque extremity n'apparaissant pas. Cette disposition nous donnera une suite de tjrets 
de quatre pixels espaces de quatre pixels. Voici la ligne qui accomplit ce prodige : 

90 MASK &X1 11 100 
run 
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Mais pourquoi ce programme ne respecte-t-il pas la sequence cboisie lorsqu 'il trace un coin ? Tout 
simplement parce que le coin est trace" deux fois : en tant que dernier point et premier point des 
tignes qui le composent On peut contourner ce probleme comme ceci : 

115 MOVE 180,22 
125 MOVE 178,180 
135 MOVE 20,1 78 
run 

On obtient bien Teffet 66sir6, mais il y a beaucoup plus simple. Si Ton ajoute a la commande 
MASK un second parametre '\ff\ rordinateur ne trace pas le {^emier point de cbaque ligne. 
Comgeons alors la ligne 90 : 

90 MASK &X001 11 100,0 
. m effacons les lignes que nous venions d'ajouter en entrant : 

115 

125 
135 

_£ cadre trace" en pointilles par notre programme a maintenant un aspect sym&rique. Si le second 
-*w*tre de MASK etait fixe a M ", la commande tracerait a nouveau le premier pixel de cbaque 

-.fie 

' ja regardez de plus pres les espaces separant les tirets : ceux du triangle infeneur ont quelque 
;>* de plus que ceux du triangle supeneur. II s'agit du papier graphique auquel la commande 
lO 2, ligne 50, a attribue I'encre 2. L'encre 2 etant aussi la couleur du fond, le papier graphique 
-* wmible dans le triangle supeneur. Modifions done la ligne 50 : 

50 CLG 2:GRAPHICS PAPER 

a tanas tourner le programme : la couleur du papier se detache maintenant tout autour du 

jot 

* x»t egalement choisir un papier graphique "transparent" si Ton desire que les espaces d'une 
i^K pouitillee laissent tramparaitre le trace" sous-jacent On obtient un trace" transparent en 
i^t a la commande GRAPHICS PEN le parametre ",1" (le parametre ",0" nous ramene au 
caqne). Modiiiez done la ligne 70: 

70 GRAPHICS PAPER 1,1 

m mjm le resuhat 

«m »pariioQ du curseur graphique, il est non seulement possible de tracer des lignes ou des 
^■a. ■■■ anssi d'inscrire du texte. Cette caraeteristique permet de positionner les caracteres 

-. plus grande precision (a un pixel pres, au lieu de huit) et de les agrementer en jouant 

■fats modes d'encre graphique (voir plus haut). 
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Pour ecrire sur Pecran grarjhique, poaitionnez d'abord te cnrseur a rendroit on devra se trooycr 
le caractere de gauche, puis entrez la commande TAG (ou TAG#l,etc... selon le canal desire^ 
suivie des commandes PRINT usuelles. Le curseur graphique se deplace autamatiquemeut de 8 
pixels vers la droite a cbaque caractere track Essayez vous-meme : 

160 MOVE 64,100 

170 TAG 

180 PRINT "SALLY" 

190TAGOFF 

run 

Bieu que les messages emis par le BASIC s'affichent sur la fenfttre de texte sans tenir compte de 
rindicateur TAG/TAGOFF, il est bon de s'habituer a annuler la commande TAG des que Ton 
n'a plus besoin d'elle. 

Mais que representent ces fleches a droite du nom ? Ce sont les symboles du retour chariot 
C+IR$(13)etduchangementdeligneCHR$(10). Lelogiciel graphique convertit les 32 premiers 
caracteres ASCII sous leur forme visualisable, comme s'ik etaient diriges sur la fenetre texte 
precedes de CHR${1). La raison en est que ces 32 caracteres de controle ne sont utiles qu'a 
l'interieur de la fenetre texte. Dans le mfime ordre d'idfies, aucun bouclage du texte n'est pr6vu 
lorsqu'on depasse la marge droite de la fenetre graphique. 

Pour eviter Taffichage des symboles de retour chariot et de changement de ligne, on a recours au 
point-virgule a la fin de la commande PRINT : 

100PRINT"SALLY"; 
run 

Le texte dirige sur une fenetre graphique est conditionne par les commandes GRAPHICS PEN 
regissant le trace de lignes. Place sous la commande GRAPHICS PEN 1 , le nom est done ecrit 
en mode transparent Si nous passons a la commande : 

150 GRAPHICS PEN 0,1 
run 

. . .ecrira avec 1'encre numero (transparente). 

Executez maintenant le programme apres avoir efface la Hgne 150. Vous remarquez alors que le 
stylo graphique a retrouve Tencre numero 1 + le mode transparent indiques en ligne 70. 

Les caracteres transparents 

II est possible, au moyen de certains codes de controle, d'ecrire sur l'ecran de texte en caracteres 
transparents. Ajoutez au programme les lignes : 



200 PRINT #2,CHR$(22);CHR$(1) 
210 LOCATE #2,32 ,14: PR INT #2, 
220 LOCATE #2,32,1 4:PRINT #2, 
230 PRINT #2,CHR$(22);CHR${0) 
run 



H#*#**** 
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La ligne 200 etablitle mode transparent surle canal #2. Vous poovez constater que le souligne- 
arat apparalt "par dessus" les ai terisques : il est done possible de superposer plusieurs caracteres, 
rafime de couleur difterente. La ligne 230 annule le mode transparent et le canal #2 revient done 

jumode opaque. 

Les modes d'encre 

:i existe un mode d'encre graphique permettant rinteraction entre Fencre utilisee et celle qui se 
Touve deja sur l'ecran, L'ordinateur calcule alors pour chaque pixel une encre tesultante obtenue 
?ar comb'naison logique des deux encres (stylo ou papier) utilisees. On dispose ici des operateurs 
ogiques XOR, AND et OR. Le mode d'encre peut fttre ctefini soit par le quatrieme parametre des 
.ommandes DRAW/DRAWR, PLOT/PLOTR ou MOVE/MOVER, soit en ajoutant a la 
.emmande PRINT la sequence de controle CHR$(23);CHR$(<mode>). Dans tous les cas, 1 
onespond a XOR (OU exclusif), 2 a AND (FT) et 3 a OR (OU). La valeur retablit le mode 
.oimal, dans lequel la nouvelle encre utilisee apparait "telle quelle". 

3n vena dans l'exemple qui suit une utilisation de roperateur XOR. Cet operateur a la proprtete 
ae restituer r image originale lorsq u 'on trace deux fois le mfime motif et est done souvent employd 
>vec le LOGO. Vous constatez par ailleurs que le sous-programme tracant le carte est execute 
xaix fois (lignes 1 10 et 130), ainsi que la commande PRINT associee a TAG (ligne 170 et 190). 
_a commande FRAME provoque un temps d'attente suffisamment long pour nous permettre 
: observer l'effet produit Remarquez que les commandes de la ligne 90 permettent de se 
^spenser du premier parametre : celui-ci reste par defaut a sa valeur anteneure. 

_e troisieme parametre de la commande MOVE (ligne 220), donne a la commande GRAPHICS 
D EN la valeur 1, qui se substitue a la valeur 3 fixee en ligne 60. Le mode XOR est etabli par le 
raatrieme parametre de la commande DRAWR (ligne 230). Remarquez la encore le parametre 

; resent 

Do peut faire teapparattre 1 'image recouverte en annulant la commande MASK (ligne 90). Vous 
oyez egalement que les coins du carte ont disparu : en effet, apres avoir 6te traces deux fois (a 
a fin d'une ligne et au commencement d'une autre), ils ont 6te annules par Foperation XOR. 

10 REM modes d'encre XOR 

20MODE1:INK2,10:INK3,4 

30 ORIGIN 440,100,440,640,1 00,300 

40 WINDOW 1,26,1,25 

50 CLG 2:GRAPHICS PAPER 

60 DRAW 200,200,3 

70MOVE2,0:FILL3 

80 ORIGIN 440,0,440,640,0,400 

90 GRAPHICS PEN ,1:MASK ,0 

100 FOR y-60 TO 318 STEP 2 

110GOSUB220 

120 FRAME:FRAME 

130GOSUB220 

140 NEXT 

150 TAG 

1 60 FOR y-60 TO 31 8 STEP 2 
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170 MOVE 96,y:PRINT CHR$(224); 

180FRAME:FRAME 

190 MOVE 98,y:PRINTCHR$(224); 

200 NEXT 

210 END 

220 MOVE 90,y,1 

230 DRAWR 20,0„1 

240 DRAWR 0,20 

250 DRAWR -20,0 

260 DRAWR 0,-20 

270 RETURN 

run 

Inanimation graphique 

n est possible, en modifiant les couleure affcc tfe es aux encres, d'obtenir un effet d'animation. 
L'effet de mouveroent est ainsi cr& alors que le contenu de la memoire d'ecran reste inchange. 
Un exemple d'application de ce precede se trouve d'ailleurs dans le programme de "Bienvenue" 
de votre disque-SYSteme (vous pouvez assister i cette demonstration en lancant la commande 
RUN "disc"). Dependant, l'effet de "palette clignotante" utilise" dans cet exemple est insuffisant 
lorsque les fonnes successives constituant ranimation doivent se chevaucher. Le programme qui 
suit inscrit les chiffies 1 a 4 sur I'ecran, a l'aide d'encres combinees entre elles par l'operateur 
OR. Le programme determine par balayage le graphisme des caracteres affiches dans le coin 
infeneur gauche de I'ecran, puis le reproduit sous forme agrandie. Les nombres successifs sont 
ecrits en combinant les encres 1, 2, 4 et 8 en mode OR. On a eu ici recours a une sequence de 
caracteres de controle (ligne 50). 

Les lignes 160 et suivantes font toumer la palette en accord avec une formule matbematique : les 
nombres reproduits en graphique sont alors affiches un par un. Le cboix de l'encre se fait en 
examinant tour-a-tour chacune d'entre elles pour determiner si elle contient la sequence binaire 
donnee : le nombre 3, par exemple, est dessine' avec Tencre numero 4. Pour le faire apparaftre, il 
faudra done rendre visibles toutes les encres dont le nume'ro contient 4 en binaire, e'est-a-dire : 

4<0100),5(0101),6(0110),7(0111),12(1100),13(1101),14(1110),15(1111). 

Dans une application pratique, les encres modifiees a chaque stade de ranimation seraient 
calcul6es k Favance, si bien qu'on pourrait accdldrer la partie de ce programme comprise entre 
les lignes 180 a 200. 
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10 REM animation par les couteurs 

20 ON BREAK GOSUB 220 

30 FOR i-1 TO 15:INK i,26:NEXT 

40 m(1)-l:m(2)-2:m(3)-4:m(4)_8 

50 MODE OrPRINT CHR$(23);CHR${3);:TAG 

60FORp-1TO4 

70 GRAPHICS PEN m(p),1 

80 LOCATE #1 ,1,25:PRINT #1 ,CHR$(48+p); 

90 FOR x-0 TO 7 

100 FOR y-0 TO 1 4 STEP 2 

1 10 IF TEST(x*4,y)=0 THEN 140 

120 MOVE (x+6)*32,(y+6)*16:PRINTCHR$(143); 

130 MOVE (x+6)*32,(y+6)*16:PRINT CHR$(143); 

140 NEXT y,x,p 

150 LOCATE #1 1 1,25:PRINT#V"; 

160FORp-1 TO 4 

170 FOR i=1 T025:FRAME:NEXT 

180 FOR i-0 TO 15 

190 IF (i AND m(p))-0 THEN INK i,0 ELSE INK i,26 

200 NEXT i,p 

210 GOTO 180 

220 INK 1,26 

run 

Plans colons -* 

L'exemple precedent nons a montre" comment animer a Faide des changements de couleur des 
grapbiques traces avec les encres 1, 2 et 8. On peut, avec les memes encres et en utilisant les 
couleurs differemment, crier un effet completeroent different appele" ' 'plans colores". En void un 

exemple : 

10 REM Montagnes . 

20DEFINTa-z ~ 

30 INK 0,1 :INK 1,26 

40INK2,8:INK3,6 

50 FOR i-4 TO 7:INK i,9:NEXT 

60 FOR i-8 TO 15:INK i,20:NEXT 

70 MODE 0:DEG:ORIGIN 0,150:CLG:MOVE 0,150 

80 FOR x-1 6 TO 640 STEP 16 

90 DRAW x,COS(x)*150+RND*1 00,4 

100 NEXT 

110MOVE0,0:FILL4 

120cx-175:GOSUB320 

130 cx- 125: GOSUB 320 

1 40 SYMBOL 252,0,0,&C,&1 F,&30,&7F,&FF 

150 SYMBOL 253,0,6,&E,&F2,2,&F2,&FE ^ 

1 60 SYMBOL 254,0,&80,&70,&7F,&7F,&7F,&7FF 1 
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170 SYMBOL 255,0,0,0,&FB,&EC,"FE,&FF 

180 pr$-CHR$(254)+CHR${255) 

1 90 p1 $-CHR$(252)+CHR$(253) 

200TAG:t!-TIME 

210 FOR X— 32 TO 640 STEP 4 

220 x2-((608-x)*2MOD 640:hl-RND*10:hr-50*SIN(x) 

230 GRAPHICS PEN 8,1:MOVE x,100+hr„3:PRINT pr$; 

240 GRAPHICS PEN 2,1 MOVE x2,1 15+hl„3:PRINT pl$; 

250 IF (TEST(x2-S,1 15+W-12) AND 8)-8 THEN 380 

260 IF TIME-tJ <30 THEN 260 

270 FRAME.tl-TIME 

280 GRAPHICS PEN 7,1:MOVE x,100+hr„2:PRINT pr$; 

290 GRAPHICS PEN*f3,1:MOVE x2,1 15+hl„2:PRINT pl$; 

300 NEXT 

310 GOTO 210 

320MOVEcx,100 

330 FOR x-0 TO 360 STEP 10 

340 DRAWcx+SIN(x)*50+10*RND,100+COS(x)*25+10*RND,1 350 NEXT 

360 DRAW cx,1 00:MOVE cx,90:FILL 1 

370 RETURN 

380 ENT -1,1, 1,1 

390 SOUND 1,25,400,1 5„1, 15 

400 FOR y-100+hr TO -132 STEP -2 

410 GRAPHICS PEN 7,1:MOVEx,y„2:PRINT pr$; 

420 GRAPHICS PEN 8,1 :MOVE x,y-2„3:PRINT pf$; 

430 NEXT 

440 GOTO 70 

run 

La encore, le fonctMmnemeot de ce programme repose sur la fonm Hnaire to mmiero d'encre. 

Tous les numeros d'encre comprenant le bit ,( 8" (2?3) (de 15 i 8) soot sur bleu sombre. Les 
numeros d'eocre contenant le bit ,, 4*' (l 2 ) sont sur vert Les eucres 2 et 3, cootenarit cnacune le 
bit "2" (2Tl) sont sur rouges, et rencre 1 (2°), pour finir, est sur blanc briHant, rencre restant 
bleue. 

Les formes grapMques sontplacees a recran selon la fonction OR (lignes 230 a 240). La couleur 
affichee est daermiDee par le bit de poids fort resultant sur chaque pixeL Une image situ6e sur 
un plan a bits de poids fort est done toujours pr&taminante ; rarriere plan ne disparatt pas et 
redevient visible lorsque cette image est effacee. Pour effacer une image, on utilise le mode 
d'encre AND avec les encres 7, 11, 13 ou 14 a la place des encres 8, 4, 2 et 1 respectivement 
(lignes 280 et 290). 
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Les graphiques exploitant la memoire supplemental (6128 seu- 
lement) 

Pour conchire cc cbapitre, void un programme graphique complet "Salut 1' artiste", exploitant les 
derniers 64 Ko de memoire RAM do 6128. 



Les deux commandes RSX de ce programme,|SCREENCOPY et |SCREENSWAP, sont 
foumies par Tutilitaire "BANK MANAGER", stocke" sur la face 1 d'une des disquettes systfeme. 
Sites facilitent la copie et I'echange des ecrans entre les zones de memoire appropriees et entre 
:es deux parties de 64 Ko de memoire. 

> ous devez done executer rutilitaire "BANK MANAGER" AVANT de lancer ce programme 
et, pour ce faire, inserer la face 1 d'une des disquettes sysfcme, avant de taper : 

run "bankman" 

• ous pouvez alors lancer "Salut l'artiste". 



Etaprfcs? 

\pres lancement de BANK MANAGER, sirivi de celui dn programme graphique, vous voyex 
lpparanre un menu d'options, ainsi qu'un curseur graphique, clignotant au centre de recran. 

2 oe vous reste plus qu'a appuyer sur la lettre qui vous interesse (C pour cercle, parexemple) pour 
reenter l'option d6siree. 

\ titre de demonstration, tapez : 



\ppuyez sur la touche fiechee vers le haut T jusqu 'a ce que le curseur graphique s'&eve d'environ 
rois centimfetres au-dessus du centre de recran. 

* ppuyez enfin sur la barre d'espacement pour executer le cercle. Le menu reapparalt ensuite h 
icran. 

"ipezM, pour Menu, pourpasseraun menu mtermddiaire qui v«JspermeOrade<S>auvegarder, 
jt <R>etrouver vos ecrans, ainsi que de manipuler le contenu des ecrans <1 >, <2>, <3> et <4> 
sockes dans la deuxteme partie de la memoire). 

^oor exploiter ces fonctions d'ecran, tapez le numero de memoire correspondant (1, 2, 3 ou 4). 
yas obtiendrez alors un nouveau menu. 

'. vous propose : 
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S poursaovegardeiTecran 

R pour retrouver l'ecran 

E pour echanger des ecrans 

[RETURN] oourarreterroperationencours. 

Si vous d6sirez, par exemple, sauvegarder l'ecran courant dans la m6noire numero 2, tapez 2 suivi 
deS. 

Lorsque vous revenez au menu wtermediaire (apres <R>estitution, <S>auvegarde ou manipula- 
tion d'un ecran), retapez M pour revenir au menu de depart 

Le programme ci-dessous vous permet de dessiner des cases, des cercles, des triangles, des lignes, 
de placer/d6placer des points, de colorier des zones et de dessiner des caracteres. 

Lorsqu'un ecran est terming, il peut etre sauvegarde" sur disquette a 1'aide de 1'option <S>auve- 
garde du menu interm6diaire pour visualisation/modification ulteneure, et rappeifi a l'ecran, a tout 
moment, par 1'option <R>etrouver. 

Nous void a la fin du dernier chapitre de ce manuel. Apres utilisation, analyse et experimentation 
des programmes presented dans ce guide, vous devez maintenant avoir assimile" le BASIC 
AMSTRAD et le 6128/464. 

10 'SCREEN DESIGNER BY DAVID RADISIC 

20 'COPYRIGHT (C) AMSOFT 1985 

30 'REMEMBER TO RUN "BANKMAN" BEFORE RUNNING PROGRAMI 

^60' 

70 'ON ERROR GOTO 2740 » .... 

80'DEFINTA~X 

90 'MODE -^-^ ..«,.,: 

1:CH-127:CMND=1:PN(0)=0:PN(1)-26:PN(2)-15:PN(3)-6:PN(4)-0:PN=1:NORX 

-1:MENU=1:ZZ2=HIMEM 

100DIMCOMMAND$(22) 

110 NORX$(0)="NORMAL":NORX$(1)-"XOR H : 

NORX$(2)-'TRANSP":NORX$(3)-"XOR " 

120 RESTORE:READ CMNDS$(1),CMNDS$(2): 

CMND$-CHR$(16)+CHR$(&7F)+CMNDS$(1)+CMND$(2) 

130 READ CMNO:FOR 1=1 TO CMNO:READ COMMAND$(l):NEXT 

140 READ ST$:IF ST$o"**" THEN 

CMND$(CMND)-ST$:CMND=CMND+1:GOTO140 

1 50 WINDOW #0,1 ,40,1 ,3:PAPER #0,0:PEN #0,1 :CLS #0 

1 60 WINDOW #1 ,1 ,40,4,4:PAPER #1 ,3:PEN #1 ,1 :CLS #1 

170 ORIGIN 0,0,0,840,0,334 

180 X-320:Y-200:MOVE X,Y 

190 BORDER PN(4):FOR l-O TO 3:INK I.PN (l):NEXT 

200 MASK 255,0:PAPER OPEN 1 :PAPER #1 ,3:PEN #1 ,1 GRAPHICS PEN 

PN.NORX 

210 IF FLGo THEN 280 
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220 IF PN<2 THEN PNT$-CHR$(240):PX-(PN+1)*13 ELSE IF PN<4 THEN 

PNT$-CHR$(241):PX-(PN-1)*13 ELSE PNT$-CHR$(243):PX-37 

230 LOCATE PX.2.PRINT PNT$; 

240 LOCATE 1 ,1:PRINT USING" PEN - ## PEN 1 : ##";PN(0);PN(1); 

250 LOCATE 29,2:PRINT USING"BORDER : ##";PN(4) 

260 LOCATE 1 ,3:PRINT USING" PEN 2 : ## PEN 3 : ##";PN(2);PN(3); 

270 LOCATE PX.2PRINT H "; 

280 LOCATE #1,1 ,1 :PRINT#1 ,USING M X :### Y:### ";X;Y;:PRINT #1, "PLOT 
MODE : ";NORX$ (NORX+(UNDRAW*2)); M "; 
290 IF FLAG-0 THEN GOSUB 2260 
300' 

310 GOSUB 970 
320' 

330IFFLAG>OTHEN390 
340 UF l$- ,m THEN 390 

350 CMND-INSTR(CMND,I$):IF CMND=0 THEN 390 
360 IF CMND-1 THEN CLG:X-320:Y-200: GOTO 390 
370 IF CMND-2 THEN RUN 70 
380 ON CMND-2 GOSUB 1240,1410,1520,1640, 
1 840,1 860,1 950,2020,2090,21 20,2 1 70,2200 
,2660,2660,2660,2660,2390,2330.2200 
390 IF TX-0 AND TY-0 THEN 200 
400IFFLAG>OTHEN440 
410 GOSUB 630 

420 GOSUB 680:FRAME:GOSUB 680 
430 GOTO 200 

440 MOVE TEMPX t TEMPY,PN1 
450 ON FLAG GOSUB 470,490,550,640 
460 GOTO 200 

470 PLOT X,Y:GOSUB 630:PLOT X,Y 
480 RETURN 

490 DRAW TEMPX+X,TEMPY:DRAW TEMPX+-.TEMPY+Y 
500 DRAW TEMPX,TEMPY+Y:DRAW TEMPX.TEMPY 
510 GOSUB 630 

520 DRAW TEMPX+X.TEMPY: DRAW TEMPX+X.TEMPY+Y 

530 DRAW TEMPX,TEMPY+Y:DRAW TEMPX.TEMPY 

540 RETURN 

550 MOVE TEMPX,TEMPY:DRAWR X,Y 

560 IF TRISIDE-0 THEN 580 

570 DRAW TEMPXX,TEMPYY:DRAW TEMPX.TEMPY 

580 GOSUB 630 

590 MOVE TEMPX,TEMPY:DRAW TEMPX+x,tempy+ Y 

600 IF TRISIDE-0 THEN RETURN 

61 DRAW TEMPXX.TEMPYYrDRAW TEMPX.TEMPY 

620 RETURN 
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630 X-X+TX:Y-Y+TY:RETURN 

640 MOVE TEMPX,TEMPY:DRAW X,Y 

650 GOSUB 630 

660 MOVE TEMPX,TEMPY:DRAW X,Y 

670 RETURN 

680 DRAW AND UNDRAW CURSOR 

690 IF FLAG-5 THEN RETURN 

700 MASK 255,1 _ w % _ # „ 

710 IF FLAG>1 THEN XX-TEMPX+X:YY-TEMPY+YELSE XX-X:YY-Y 

720 IF FLAG-4 THEN XX-X:YY-Y 

730 IF GLAG-1 THEN XX-X:YY-Y 

740 IF UNDRAW- 1 THEN 820 

750 GOSUB 790 

760 MASK 255,0 

770 IF l$-" rt THEN GOSUB 2150:1$-"" 

780 RETURN 

790 MOVE XX-4,YY,PN,1 :DRAW XX+4.YY 

800 MOVE XX.YY-4.DRAW XX.YY+4 

810 MOVEXX,YY„XORN:RETURN 

820 NX-1:GOSUB 1220 

830 FRAME:GOSUB 1220 

840 IF !$-" " THEN NX-NORX:GRAPHICS PEN PN.1 .GOSUB 1220 

850 IS-"" 

860IFFLAG<=>6THEN760 ^ wmi 

870 IF MOVED-0 AND J$o" AND <J$<CHR$(240) OR J$> CHR$(247) THEN 

CH-ASC(J$):MOVED-1 

880 IF MOVED-0 THEN RETURN 

890 LOCATE 5,2 

900 FOR l-CH-5 TO CH+5 

910PENABS(loCH)+1 

920 CH$=CHR$(1)+CHR$(l+256)MOD 256) 

930 IF CH-I THEN PRINT H CH$" "; ELSE PRINT CH$; 

940 NEXT 

950PEN1:PRINT"- M CH""; 

960 GOTO 760 

970 TY-0:TX-0:GOSUB 680:FRAME:GOSUB 680 

980 IF INKEY(0)<^1 OR INKEY(72)<^1 THEN TY-16 

990 IF 1NKEY(2)<^1 OR 1NKEY(73)<^1 THEN TY-16 

1000 IF INKEY(8)o-1 OR INKEY(74)o-1 THEN TX-16 

1010 IF INKEY(1)o-1 OR INKEY(75)<=^1 THEN TX-16 

1020 IF INKEY(21)<=-1 OR INKEY(76)<^1 THEN TX-TX/:TY:TY/8 

1030 IF TX:0 AND TY-0 THEN MOVED-0 ELSE MOVED-1 

1040 J$-INKEY$:I$-UPPER$(J$) 

1050 IF (!$-" " OR l$-CHR$(13)) AN FLAG>0 THEN 1090 



Page 344 Chapitre 8 A vos heures de loisir... 



1080 IF FLAG-5 THEN 1120 

1070 IF FLAG-6 THEN 1170 . r 

1080 RETURN .^ 

1090 ON FUG GOSUB 1240,1410,1640,1860 1 950 2020 W 

11001$-"" ' . ■-,* 

1110 RETURN 

1 120 IF MOVED-0 THEN RETURN1 

1 130 IF TX>2 THEN PN-(PN+1) MOD 5 ELSE I F TX<-2 THEN 

PN-ABS((PN<1))*5-1+PN 

1 140 IF TY>2 THEN PN(PN)-(PN(PN)+1) MOD 27 ELSE IF TY<-2 THEN 

PN(PN)-ABS((PN(PN X1)*27-1 + PN(PN) 

1150 GRAPHICS PEN PN:PEN #1,PN 

1 160 TX-0-TY-0:BORDER PN(PN):RETURN 

Vu°lnJZl? ™ EN CH " AB S(CH + 255) MOD 2561 180 IF TY<0 THEN 

?o™ A ,^ CH+246) M0D 2581190 IF T^ THE N CH-(CH+1) MOD 256 
1200 IF TY>0 THEN CH=(CH+10) MOD 256 

121 OTX-0:TY-0: RETURN 4f 

1220 TAG:MOVE XX-8,YY+6,PN,NX:PRINT CHR$(CH);:TAGOFF 

1230 RETURN 

1240 'C 

1250 IF FLAG-1 THEN 1290 

1260 RO-1:GOSUB 2240 

1270TEMPX-X:TEMPY-Y:FLAG«1 
1280 RETURN 

1290 IF TEMPX-X AND TEMPY-Y THEN 1390 
1300 PLOT X,Y„1 

^10TIX-MAX(X,TEMPX)^IN(TEMPX,X):TIY-MAX(Y,TEMP\O^IN(TEM- 

1320 TI-SQR((TIXT2)+(TIYT2)) 
1330 ORIGIN TEMPX.TEMPY 

1340 PLOT 0,0,PN,0:MOVE 0,-TI 

1350 FOR 2:0 TO PC2+0.01 STEP PI/ffl/2)1360 ORAW 

SIN<Z + PI)*T|,COS(Z + PI)*TI,PN,N ORX 

1370NEXTZ 

1380 ORIGIN 0,0 

1390X-TEMPX:Y-TEMPY:TEMPX-0:TEMPY-0:FLAG:0 
1400 RETURN 

1410' B 

1420 IF FLAG-" THEN 1470 
1430 RO-2: GOSUB 2240 

1440 TEMPX-X:TEMPY-Y:FLAG2 
1450 X-0:Y-0 
1460 RETURN 
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1470 IF NORX-1 THEN 1500 

1 480 MOVE TEMPXJEMPYtDRAW TEMPX + X,TEMPY„NORX 

1490 DRAW TEMPX+X,TEMPY+Y:DRAW TEMPX, TEMPY+Y:DRAW 

1 500 X-TEMPX:Y-TEMPY:FLAG-0 

1510 RETURN 

1520' F 

1530 RO3:G0SUB 2240 

1540 GOSUB 1620:IF l$- M " THEN 1800 

1550EDGECOL-VAL(I$) 

1 560 RO-4:GOSUB 2240 

1570 GOSUB 1620:IF l$- M " THEN 1600 

1580FI!_LER-VAL(I$) 

1590 MOVE X,Y,EDGECOLFILL FILLER 

1600FLAG-0:I$-"" 

1620 l$-INKEY$:IF (l$<*0" OR l$>"3") ANDI$o" * THEN 1620 

1630 RETURN 

1640' T 

1650 IF GLAG-3 THEN 1700 

1660 FLAG-3:RO-5:GOSUB 2240 

1670 TEMPX-X:TEMPY-Y f*v- ■ l 

1880X-0:Y-0 

1690 RETURN 

1700 IF TRISIDEoO THEN 1770 

1710 RO=6:GOSUB 2240 

1720 MOVE 0,0,PN,1:GOSUB 590 

1 730 TEMPXX-TEMPX+X:TEMPYY-TEMPY+Y:X-X/2:Y-20 

1740TRISIDE=1 

1750 GOSUB 550:GOSUB 590 

1760 RETURN 

1770 IF NORX-1 THEN 1800 „„ w ..„„ 

1780MOVETEMPXX,TEMPYY„NORX:DRAWTEMPX,TEMPY 

1790 DRAW TEMPX+X,TEMPY+Y:DRAW TEMPXX.TEMPYY 

1 800 TEMPXX-0:TEMPYY-0 

181 X-TEMPX:Y-TEMPY:TRISIDE-0 

1 820 TEMPX-0:TEMPY-O:FLAG-0 

1830 RETURN 

1840 '& 

1850 NORX-1 :UNDRAW-UNDRAW XOR 1:RETURM 

1860 'L 

1870 IF FLAG-4 THEN 1910 

1880 RO-7:GOSUB 2240 

1890 TEMPX-X:TEMPY-Y:FLAG-4 

1900 RETURN 
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1910 IF NORX-1 THEN 1930 

1 920 MOVE TEMPX,TEMPY„NORX:DRAW X,Y 

1 930 X-TEMPX:Y-TEMPY:FLAG:0 

1940 RETRUN 

1950 'I 

1960 IF FLAG-5 THEN FLAG-0:CLS:INK 3, TMPCOLINK PN.COLGOTO 
1990 

1970 CLS:FU\G-5:BORDER PN(PN) 

1980 RETURN 

1990 FOR l-O TO 3:INK l,PN(l):NEXT: BORDER PN(4) 

2000 IF PN-4 THEN PN-1 

2010CLS-.RETURN 

2020 'A 

2030 IF FLAG-6 THEN 2070 

2040TEMPX-0:TEMPY-0:CLS 

2050 UNDRAW- 1 :FL4G-6:NORX-1 :MOVED-1 

2060 RETURN 

2070FIJ\G-0 

2080 RETURN 

2090 'N 

2100NORX-0 

21 10 RETURN 

2120* E 

21 30 GRAPHICS PEN PN,0:TAG:MOVE XX-8,YY+6„0:PRINT " ""TAGOFF 

2140 RETURN 

2150'<SPACE> 

2160 PLOTX,Y,PN,NORX:RETURN 

2170*X 

2180 NORX-1 

2190 RETURN 

2200 * M 

2210 MENU-MENU MOD 2+1 

2220 GOSUB 2260:RETURN 

2230 l$-UPPER$(INKEY$):IF l$-«" OR INSTR(SER$.I$H) THEN 2230 ELSE 

RETURN 

2240 CLS:UNDRAW-0:PRINT CMND$<RO);: LOCATE 1,3:PRINT "<SPACE> 

";:IF RO-3 OR RO-4 THEN PRINTTO EXIT" 

2250 RETURN 

2260CLS:FLAG-1 

2270 FOR 1-1 TO LEN(CMNDS$(MENU)) 

2280PS-I+ABS(MENU-2)*LEN(CMNDS${1)) 

2290 PEN 1 :PRINr<"MID$(CMNDS$(ME- 

NUJ.UJVMIDSfCOMMANDSfPS)^)""; 
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2300 NEXT 

2310 PRINT"<CLR><DEL><SPACE>"; 

2320 RETURN 

2330 ' S ' 

2340 GOSUB 2460:1 F FILENAMES-"" THEN 2370 -3f 

2350 GOSUB 2550 

2360 SAVE FILENAMES,B,&COOO,&4000 

2370 GOSUB 2260 

2380 RETURN 

2390 'R 

2400 GOSUB 2460:1 F FILENAMES-"" THEN 2440 

2410 GOSUB 2730 

2420 LOAD FILENAME$,&C00O 

2430 GOSUB 2570 

2440 GOSUB 2260 

2450 RETURN 

2460 CLS:LOCATE 10,3:PRINT*<RETURN>TO ABORT!"; 

2470 LOCATE 1,1:PRINT"ENTER FILENAME :"; 

2480 INPUT "\F1LENAME$:IF FILENAMES-"" THEN RETURN 

2490 N-INSTR(FILENAME$,"."):IF N=0 THEN 2520 

2500 IF N-1 THEN 2460 

2510FILENAME$-LEFT$(FILENAME$,N-1) 

2520FILENAME$-LEFT$(FILENAME$,8)+".SCN N 

2530 CLS 

2540 RETURN 

2550 FOR 1-0 TO 4-POKE &C000+l,PN(l):NEXT 

2560 RETURN 

2570 FOR 1-0 TO 4:PN(I)-PEEK(&C000)+I) MOD 27:NEXT 

2580 CN-0:FOR 1-0 TO 2-IF PN(I)-PN(I+1) THEN CN-CN+1 

2590 NEXT:IF CN-3 THEN 2630 

2600 FOR l-O TO 3:INK l,PN(l):NEXT 

2610 BORDER PN(4):PN-1:GRAPHICS PEN PN 

2620 RETURN 

2630PN(0)-0:PN(1)-26:PN(2)-15:PN(3)-6:PN(4)-0 

2640 GOTO 2600 

2650 ' 1,2, 3, & 4 

2660 CLS:PRINT"DO YOU WISH TO <S>TORE": PRINT 

TAB(16)"<R>ETRIEVE H :PRINTTAB (13)"OR <E>XCHANGE THE SCREEN?' 

2670 SER$-"SRE"+CHR$(13):GOSUB 2230:1 F l$-CHR$(13) THEN 2260 

2680 BNK2-(CMND-1 3):BNK1 ^1 

2690 IF l$-"S" THEN CLS:GOSUB 2550:D SCREENCOPY.BNK2.BNK1 

2700 IF l$-"R" THEN GOSUB 2730:uSCREENCOPY,BNK1 ,BNK2: GOSUB 

2570 

2710 IF l$-"E H THEN CLS:GOSUB 2730:GOSUB 2550:CiSCREENS- 

WAP,BNK2,BNK1 :GOSUB 2570 

2720 GOSUB 2280:RETURN 
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2730 FOR 1-0 TO 3:INK l,0:NEXT: BORDER 0:RETURN 
2740 CLSrGOSUB 2600:RESUME 2260 
2750 DATA-CBF&LIANEXMY1234RSM" 

2760 DATA 19,CIRCLE,"BOITE 7REMPLIS ".TRIANGLE, ALTER- 
NATE ."LIGNE V'ENCRE H ^SCIt,NORMAUERASE,"XOR "."MENU ", H 1ER 
Y2EME Y3EME Y4EME ",RESTORE,"SAVE "/MENU " 
2770 DATACIRCLE.BOX.EDGE COLOUR.FILLER COLOUR/TRIANGLE 
1, TRIANGLE 2.LINE,** 



Pour en savoir plus... 

Poor cooclrae, nous vous proposons 4 annexes comprenant : le contrat d 'utilisation des logiciels, 
un glossaire de tennes, quelques programmes de jeux et tin index complet du manuel. 

sous esperons que cette lecture vous a t\& profitable et vous remercions d'avoir fait confiance a 

\MSTRAD. 
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Annexe 1 

Contrat d'utilisation des logiciels 

Digital Research & AMSTRAD 



NOTICE A LIRE ATTENTIVEMENT PAR L'UTILISATEUR J 

N'OUVREZ PAS VOTRE PROGICIEL AVANT D'AVOIR LU CE CONTRAT. L'OUVRIR 
IMPLIQUE VOTRE ACCORD AVEC LES CONDITIONS ET LES LIMITES D'UTILISA- 
TION DEFINIES CI- DESSOUS. 

Definitions 

Dans ce contrat, te term* : 

1 . DRI Bignifle DIGITAL RESEARCH (CALIFORNIE) INC, proprietalre des droite tfauteur et des brevets des 
programmes. 

2. Machine eignifie le micro-ordinateur sur lequel vous utJIisez le programme. Lee systemes a pJusieure 
-nicro-ordinate^re requierent I'obtention de licences supplementairee. 

3. Programme eigmfie I'ensembte des programmes, de la documentation et du materiel s'y rapportant, ainsi 
que toutes les annexes et lee misee a jour qui pourraient voua etre fourniee par DRI, quelle que sort ('utilisation 
que vous en fartes ou ies modrfications que vous y apportez. 

4. AMSTRAD sfgnifie AMSTRAD CONSUMER ELECTRONICS PLC, Brentwood, ESSEX. 

,'ous assumez la pleine responsabilrt.edu choix de votre programme, de sa mise en service, de son utilisation 
■?t des resuttats qui en decouJerorrt. 



Licence 

.ous pouvez : 

Ut'liser le programme sur une seufe machine. 

2. Copier le programme sur support magnetique ou sur papier pour la duplication ou la modification du 
Dfogramme dans te cadre de I'utilisation sur une seule machine. Vous pouvez faire ju8qu*a trois copies pour 
•as raisons invoquees ci- dessus. Certains programmes pourront cependant etre concus afln de limrter ou 
-Sme d'empechertoute copie. Its sontalors reperes en consequence par la mention "copy protected" (protege 
i la copie). La copie de la documentation est interdite. Le desassemblage est interdit 

3 Modifier le programme et/ou I'incorporer a un autre programme pour votre propre usage sur une machine 
nique. (Toute parte du programme incorpor6e a un autre iogidel corrtinuera a etre suierie aiix conditions du 
resent contrat). 

4. Coder le programme et sa licence a un tiers, & condition de notrfier a DRI le nom et radreese de ce tiers 
fous reserve que ce tiers : a) accepte les conditions de licence, b) signe et envoie a DRI une copie de la carte 
r enregistrement et c) paye lee taxes de transf ert. Si vous cedez le programme, vousdevezsoiten c6der toutes 
•=3 copies (imprimees comme magnetiques) y compris I'original, sort detruire tout ce qui n'a pas 6t6 c6d6. Ceci 
clut toutes les modifications et portions de programme contenues ou fusionnees dans <fautres programmes. 
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Vou* devez reproduire ot joindre a toutes copies, modifications eta, la notice concemant lee droits de 
reproductions reserves. 

CHAQUE DISQUETTE POSSEDE UN NUMERO DE SERIE ET VOUS NE DEVEZ Nl UTILISER, Nl COPIER, 
Nl MODIFIER Nl CEDER A UN TIERS LE PROGRAMME OU UNE COPIE. UNE MODIFICATION OU UNE 
PARTI E FUSIONNEE DU PROGRAMME. SAUF DANS LES CONDITIONS PREVUES PAR CE CONTRAT. 
SI VOUS CEDEZ UNE COPIE, UNE MODIFICATION OU UNE PARTI E FUSIONNEE DU PROGRAMME, 
VOTRE LICENCE EST AUTOMAT1QUEMENT ANNULEE. 



Echeances 

Votre licence est vataUe jusqu'a son annutstkxi. Vous pouvez cependant y mettre fin a tout moment en 
detruisant le programme ainsi que toutes ees copies, modifications et parties fustonnees. II prend egalement 
fin sous certaines condrHons citees plus loin dans ce texte, ou si vous ne respectez pas les clauses du present 
contrat Vous devez dans ce cae detmire le programme ainsi que toutes see copies, modifications et parties 
fusionnees. 



Limites de garantie 

LE PROGRAMME EST UVRE TEL QUEL Nl DRI, Nl AMSTRAD NE GARANTISSENT, SOUS QUELQUE 
FORME QUECE SOIT. EXPUCITEMENT OU IMPLICITEMENTYCOMPRIS LES GARANTIES IMPLICITES 
A TOUT ACHAT DE MARCHANDISE, Nl LE PROGRAMME, N I SON APTITUDE A ACCOM PUR UNE TACHE 
PARTICULIERE. LE RISQUE, TANT DU POINT DE VUE DE LA QUAUTE QUE DES PERFORMANCES DU 
PROGRAMME, EST ENTIEREMENT VOTRE. SI LE PROGRAMME SE REVELE DEFECTUEUX, TOUTES 
LES CHARGES, REPARATIONS OU CORRECTIONS SONT A VOS FRAiS. 

Ni DRI, ni AMSTRAD ne garantiasent que les foncfions contenues dans ce programme vont correspond re a 
vo« beeoins ni que leur derouiement s'effectuera sans interruption ou sans erreur. AMSTRAD garantie 
cependant que la dtequette sur laquellesetrouve le programme est sans d6taut et de bonne facon, en concitions 
normales (fufliealion, pour une periode de 90 jours a partir de la daterfachatfatteeteepafunephotocopiede 
votre recu). 

Limite des recours 

Si votre dtequette est defectueuse, AMSTRAD s'ertgage a la remptocer dans tes limites de garantie indiquees 
d-dessus, soue reserve que vous la retourniez accompagnee de la photocopie de votre recu. 

EN AUCUN CAS, Nl DRI, Nl AMSTRAD NE SERONT RESPONSABLES DES PREJUDICES CAUSES, Y 
COMPRIS LES PERTES EN GAIN, LES PERTES EN PROFIT OU LES DOMMAGES INDIRECTS, MEME SI 
DRI OU AMSTRAD ONT ETE AVISES DE LA POSSIBILITE DE TELS PREJUDICES. 



Carte d'enregistrement 

DRI »e reserve le droit de mettre a jour see programmes de temps en temps. Les rrssee a jour vous •eront 
fourniee seulement dans le cas ou une carte d'enregjstrement dQment signee a ete retoumee au siege de DRI. 
DRI n'est en aucun cas tenu de tains ses mises k jour, ni de vous tes envoyer. 



I 
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G^n6ralit& 

Vous ne pouvez ceder nl transferer la teence ou le programme, sauf specification expreese du contraL Tout© 

:antative de cession de la fcence, ou de transfert dee droits, annule le contrat 

^a contrat eat regi confortnement aux termee de la bi britannique. 

=our tout retweJgnement, contacter DRI, a radresse suivante : Digital Research Inc., P.O. Box 679. Pacific 

3rove,CaHomia 83850. 

~e CONTRAT NE POURRA ETRE MODIFIE QUE PAR UN AMENDEMENT ECRIT FAIT PAR UNE 

= S RS ONNE AUTORISEE D'AMSTRAD OU DE DRI. TOUTE MODIFICATION APPORTEE PAR ORDRE 

I ACHAT, DE PUBUCITE OU AUTRE REPRESENTATION NE SERA PAS VALABLE. 

. OUS RECONNAISSEZ QUE VOUS VENEZ DE URE, DE COMPRENDRE ET D'AGREER AUX TERMES 

= T CONDITIONS DE CE CONTRAT, VOUS RECONNAISSEZ PAR AILLEURS QUE LES CLAUSES Ch 

= R ESENTES CONSTITUENT LA TOTAUTE DU CONTRAT ETABLI ENTRE VOUS, DRI ET AMSTRAD QUI 

iXNULE TOUTE PROPOSITION OU ACCORD PREALABLE, ORAL OU ECRIT, ENTRE VOUS. DRI ET 

AMSTRAD ET FAIT AUTORITE EN MATIERE DE CONTRAT. 

:£ CONTRAT NWERVIENT PAS SUR VOS DROITS STATUTAIRES. 
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Annexe 2 

Petit dictionnaire (fran$ais et anglais) 

A I' intention des utilisateurs du 6128/464 Plus 
Acces direct 

Mode d'acces permettantde lire une information en memoireou surdisquette dans n'importe quel 

ordre. 

Accumulateur 

Emplacement memoire dans le microprocesseur qui retient temporairement les donn^es a mani- 
puler. Note : toes employs en langage machine. Les utilisateurs du BASIC n'ont pas besoin de 
>avoirqu'Uexiste. 

Adresse 

^umero utilise* dans une instruction et qui specifie remplacementd*'une "cellule" dans la memoire 
:e rordinateur. 

Algorithme 

Norn pompeux ddsignant une formule ou une somme complexe ; c'est aussi une sequence 

: 'operations arithm6tiques qui effectue une tfiche precise. 

Alimentation * 

Jesigne la source d'energie d'un systfeme ainsi que I'electronique necessaire a ralimentation 
.orrecte des circuits. 

Alphanumenque 

Jualifie des chiffreset des lettres, par opposition aux caractfcres graphiques. 
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Amorce (Boot ou Boostrap) 

Sequence detractions qui permet rintroduction d'un programme en memoire ROM, initialisant 
ainsi le processus de chargement a un emplacement memoire precis. Note : on parle aussi 
d'amorcage. 



AMSDOS 

Amstrad Disk Operating System : systeme d'exploitation Amstrad permettant au BASIC d'acce- 
der a une ou plusieurs disquettes. 

AMSOFT 

Division logicielle d'AMSTRAD qui s'occupe surtout de concevoir, d'organiser et de publiertout 
ce qui est necessaire a votre 6128/464 et a ses nombreuses possibility d'extension 

A/N 

Voir Analogique 

Analogique (Analog en anglais) 

Qualifie une grandeur qui ne presente aucune discontimritt, ni dans le temps tri en amplitnde. 
Note: l'ordinateur etant par essence un appareil numerique, il doit done etre muni de convert- 
isseurs A/N (analogique/numenque) pour analyser des grandeurs analogiques. 

Animation 

Effet de "dessin ammtf • qui se produit lorsque Foidiiiateur deplace des dKmente grapbiques, 
dormant ainsi l'illusion du mouvement 



Architecture 

Organisation matenelle de rordinateur et de ses peripheriques, qui permet d'etablir les relations 
avec le bus de donnees, les echanges internes ou externes, etc. 



Argument 

Teimernatheiratiqued&dgnaiitmK^ Parexemple, dans 1'expression x+y-z, 

x et y sont les arguments. 
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Ascn 

Code quasiment universe! qui peraiet de representer les nombres, lettres et autres symboles 
obtejius a partir du clavier ou d'un autre type de commande. 



Assembleur 

M6tnode pratique de programmation en code machine, ou les instructions en code sont appelees 
par des mnemoniques (lettres qui suggerent une fonction, ADD pour addition par exemple). 



Autonome 

Se dit d'un materiel tort^Wlftftionne indfipendamment de tout autre. 

Base 

Premiere consideration d'un mamftnaticien quand fl jooe avec les nombres : en binaire port U 
base % en hexadecimal pour la base 16 et en decimal pour la base 10. 

Base de donnees 

Ensemble de donnees ayant des liens entre elles, pouvant aller du simple fichier a une organisation 
complexe de dossiers relies les uns aux autoes. 

BASIC 

_angage simplifi6 de programmation dont rappellation provient de r anglais Beginners AH-Pur- 
.■ose Symbolic Instruction Code. Note : il permet une programmation interactive et a 6t6 concu 
xmr on apprentissage facile. On peut essayer un programme a tout moment alors que pour les 
rrogrammes compiles (voir ce mot) on doit d'abord appeler le compilateur. 

BAUD 

oit6 de mesure du passage des donnees dans une transmission en seiie egale, la plupart du temps, 
w nombre de bits par seconde. 

BCD (Binary Coded Decimal = Decimal Code* Binaire - DCB) 

Sy*eme permettantde coder les nombres deomaux, chaque chiffre etantrepr6sent6 par un groupe 
* 4 bits. 
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BDOS (Basic Disk Operating System) 

Module Sexploitation des disquettes. C'est une partie du CP/M qui sert d'interface entre le 
programme utilisateur et les fonctions du CP/M. 

Binaire m. 

Nombre repr&ente en notation binaire. Note : avec le 6128/464, ils sont designes avec le prefixe 
&X, par exemple &X0101 est egal au nombre decimal 5. 

BIOS (Basic Input Output System) 

Module de gestion des entrees/sorties. II s'agit de la partie de CP/M dependante du materiel, 
specialement ecrite pour un type d'ordinateur. Toutes les entrees/sorties (ecran, clavier, disquette, 
etc...) sont gerees par le BIOS. 

Bit 

Information representee par un symbole a deux valeurs notees et 1 dans le systeme binaire, et 
que l'ordinateur reproduit par des moyens electroniques. 

Bitsignificatif 

Nombre dont la signification n'apparalt qu'en binaire et dont rinflueoce dans un octet est 
preponderante. 

Bogue 

Voir Bug 

BOOLE (Algebre de ) 

Utilisee dans les tables de verite\ ou 1 veutdire vrai etO signiflefaux. 






< 






Boot 

Voir Amorce 
Bootstrap 

Voir Amorce 



tef? 
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Boucle 

Proc6d£ de programmation au cows duquel 1'oriinateor rfpete I'execution de plosieurs lignes 
josqu'a ce qu 'une condition soit remplie. 



Bruit 

1^ capacity sonoresdu6128/464peimett^ 

aleatoires pour creer des effete sonores, des explosions par exemple. 



Bug 

En Anglais, c'est une bestiole. En informatique, c'est ce qui fait qu'un programme se "plante" : 
c'est 1'eneur, le pepin, au sens le plus large. En Francais, on a propos6 le terme "bogue" Equivalent 
de"bug". 

Bus 

Systeme de connexions entre rordinatenr, les penpbeiiques et le monde exterieur qui transporte 
! 'information concemant Vttat du microprocesseur, la RAM et d'autres Elements materiels. Le 
Bus du 6128/464 est la prise la plus importante a Farriere de la machine. 



Byte 

Voir Octet 
CAD 

VoirCAO 



r:Sh^<" -"Tiifff '■ . ■ • ■■~*li" .; ,:. "i '■ ■ ■ a TitftBy$>. - ■ ■ .- .»? .■■ 



CAE 

VoirEAO 

Canal (stream) 

vok de communication entre rordinateur et ses peripheriques (imprimante, ecran, disquette, 
.assette, etc...) 
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CAO (Computeur Aided Design - CAD) 

Conception Assistee par Ordinateur, a savoir l'ensemble des techniques iafonnatiques utilises 
dans les bureaux d'etudes lors du processus de conception d'un produit nouveau. 



Caractere 

Tout symbole qui peut etre represente' : lettres, chifftes ou symboles de ponctuation et graphiques 
(Annexe 3) 



Caracteres (chafhe de) 

Ensemble de caracteres utilise comme un tout pourpetmettre des traiternentset des manipulations 
detexte. 



Caracteres (jeu de) 

Toutes les letires, nombres et symboles disponibles sur un ordinateur ou une imprimante. Si un 
caractere existe sur un ordinateur, cela ne veut pas obligatoirement dire qu'il peut etre recu par 
une imprimante quelconque. 



Cartouche 

Ensemble de circuits integres specialement programmes se branchant sur une prise particulifcre de 
Fordinateur. Note : Bien qu'ils soient plus onereux que les supports magndtiques, les progiciels 
qu 'ils contiennent se cbargent plus facilement et travaillent plus rapidement que les programmes 
sur disquette, mais plus chers que les logiciels foumis sur disquette. 



Cassette 

Support de la purpart des p ro gramm es destines aux micro-ordinateurs familianx. Etant donn6 que 
les fichiers sont placed les uns apres les autres (en ordre sequentiel), Faeces est plus lent que sur 
les disquettes. 



Catalogue 

Zone de la disquette on sont notfes let entrees de clitqoe Adder; tine somde table des imtieres 
de la disquette. 



CCP (Console Command Processor) 

Logiciel de traitement des commandes qui permet, apres que Fopdrateur ait entre" les commandes 
au clavier, de les charger et de les exgeuter. 
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Chatne 

Souveot sous-enteodu alphanom&ique. Type de doonee compreuant dcs chif&es et des lettres ne 
pouvant fttre traitee comme une variable numerique. Peut eire numeiique, mais n'est consideree 
comme telle que si une commande le precise. 



Clavier 

Serie de touches electroniques surrilaires 4 celles d'une machine ft ecrire. Note rilexisteptasiears 
types de clavier dont le QWERTY, d'origine anglaise, et l'AZERTY, d'origine ftancaise. 



Clavier numerique 

Partie du clavier regroupant des touches numenques, afin de fadliter I'entree des donnees 
mimeriques, et dans le cas du 6128/464, des touches de foncuon detinissables par Tutilisateur. 



Code a Barres 

Code d'identification de prodnits, forme" de barres noires plus ou moins espacees que seul un 
dispositif special peut lire. Note : vous le trouverez sur la plupart des emballages des produits que 
vous achetez (lait, lessive, biscuits, etc..). 



Code Machine 

Langage de prograrnmation qui est compris par un processeur, toutes les commandes elant 
exprimfies en binaire. 



Commande 

Instruction que le programme doit suivre. 



Commande integree 

Commande qui fait partie du systeme d'exploitation. Evitant les d61ais d'acces, elles sont toujour* 
plus rapides que les commandes nisidant surdisquette. 
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Compilateur 

Programme ties complexe qui transforme un programme en langage de haul niveau tel quele 
BASIC, en un programme en code machine directement executable par la machine, done tres 
rapide. 

Coupleur acoustique 

Dispositif electronique qui comprend, entre antres, un microphone etun haul parleur sur lequel il 
est possible de placer un combine telephonique afin de transmettre des donnees par ligne 
telephonique. 

CP/M (Control Program for Microcomputers) 

Programme de controle pour micro-ordinateurs. Note : e'est un des systemes Sexploitation pour 
disquette les plus repandus, lance par DIGITAL RESEARCH. 

CPU 

Central Processing Unit : alias le "chef d'orchestre" de Pordinateur. Note : on trouveparfois UCT 
en francais pour Unite Centrale de Traitement 

Crayon optique 

Crayon qui peut parfois dessiner sur l'ecran ou saisir des doimees, teUes que les codes a banes, 
par exemple. 

Curseur 

Petit carre qui indique ou va apparattre le procbain caractere sur l'ecran. 
Curseur graphique 

Curseur semblable a un curseur de texte, mais se rapportant a l'ecran graphique. Un concept 
invisible sur le 6128/464 mais indispensable pour dessiner. 

Decimate (notation) 

C'estnotre systeme a base 10, avec dix chiffres de a 9 facik a coniprenore pour nous, mais pas 
pour rordinateur, qui ne sait compter qu'en et 1 . 



. — _— _~^— — _„_^ 
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Defilement 

"CTmeddfinissantlemoqvemCDt ascendant de l'affichage apres remplissage de l'ecran jusqu'a la 
anriere Hgne, perrnettant le degagement d'espace requis pour renlr6e ou la sortie de nouvelles 
formations. 



DeHmiteur 

oirSeparateur 



Demarrage Ik cbaod - " 

oreque Ton fait un [CTRL]C sobs CP/M. Le demarrage a chaud reinitialise le systeme d'eaploi- 
juoo sans dgtruire les donnees en memoire centrale. 



D&narrage a froid „ ,_ 

; s'agit de l'amorce et de Penalisation d'un systeme d'exploitation. Le demarrage a fioid dn 
JP/M se fait par la commande : CP/M sous BASIC. 



Deterioration 

"destruction ou alteration du conteou d*un fieWer sur disquette ou de la memoire de maniere 
^desirable et jxrecuperable. 



Diagnostic 

'-'.essage produit automatiquement par rordinateur pour indiquer et identifier une erreur dans un 
Togramme ou dans la machine elle-meme. 



Dialogue ordinateur-penpherique (Handshaking) 

^quence de signaux eiectroniques generant, venfiant et synchronisant les echanges de donnees 
-atre un ordinateur et un penphenque ou entre deux ordinateurs. 



Digitaliseur (Digitizer) "* 

tspositif permettant de convertir des informations de type analogique en type numerique et de 
a transmettre a un ordinateur, n est souvent utilise" avec les tables graphiques. Note : en francais 
a trouve parfois le terme "numenseur". 
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Disque 

Haque ayant tme on deux surfaoahwcoovcrtcs d'un oxyde magnetique ct qui pennet de garder 
les donnees qui y sont enregistrees de maniere permanente. 

Donn^es exploitables sur machine 

Donnee* ou infomiations directement exploitable* sur ordinateur sans traitement supplemeutaire 
a partir du clavier ou autre. 

DOS (Disk Operating System = systeme d'exploitation sur dlsqne) 

Systeme qui gere ^utilisation des disques. les plus connus etant CP/M, MSDOS et UNIX. 

Double face 

Disquette qui peut emmagasiner des informations sur chaque face, ou unit*! qui pennet d'avoir 
acces aux deux faces sans que 1'on ait besoin de tourner la disquette. 

Dr. LOGO 

Logo de Digital Research, n s'agit d'un langage de programmation par lequel une tortue 
materialise le curseur graphique. 

EAO(CAE) 

Enseignement assiste par ordinateur. Ensemble des techniques et de methodes appliquant rinf or- 
matique dans Tenseignement 

Editor 

Modifier un umgi am me, des donnees ou un texte. 

Editeur 

Prograrnmehabituellement^^ * 

Editeur d'ecran 

mteur de texte ou de programme pemiettart le d 
pour modifier les caracteres y figurant 

X J 
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Enregistrement 

Ensemble d'informalions formant un tout logique et physiquement liees dam tea operations de 
transfert entre les supports exteraes et la m&noire d*un ordinateur. 



EPROM (Erasable Programmable Read Only Memory) 

Une PROM qu'on peut programmer puis effacer a l'aide d'un rayonnement ultra- violet Erreur 

syntaxique 



Erreur de syntaxe 

Erreur apparaissant lorsque les regies du p ro gr amme soot contrariee* par utilisation de mots-cles 
ou de variables incorrects ; rutilisateur en est averti par un message du BASIC. 

Expression 

Formule simple ou complexe qu'on utilise dans un programme pour faire un traitement sur des 
dounees, rexpression dCfinissant souvent le type de donnees a manipuler. 

. ill 
Fichier (File) 

Ficbier, programme ou groupe de donoees geoeralement stocke* sur une cassette ou sur une 
ijqoette. 



Firmware (Logiciel integre', Microprogramme) 

-ogiciel integrg au materiel tel que le BASIC et le systeme d'exploitation en ROM 

Floppy disk 

Mot anglais pour disquette. Voir Diaque 
Formatage 

Processus permettant d'organiaer un systeme pour retrouver les fichiers et leurs references dans 
les secteurs particuliers de la disquette. 



Form 

■gage professionnel de programmation rapide, a mi-chemin entre le haut niveau et le code 

flflCQlDC* 
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GeneYateur de son 

Partie de l'ordinateur (soft un nucroprocesseur soit m logkad) qui cree les sons et les bruits. 



Generations d'ordinateurs 4^^ 

Les avances technologiques ont marque les etapes de Involution des ordinateurs et de l*informa- 
tique. La cinquieme gen6ration est en gestation, eUe devrait pennettre a on ordinateur de se 
programmer lui-meme en utilisant l'lntelligence Artificielle (voir ce terme). 

Graphique 

Representation plane d'une fbrlcMon inaJheniatique : Hgrtes, cercles, diagrammes, ets. 

Graphisme de la tortue &&&'. 

Quand la tortue se deplace, elle laisse la trace de son passage sur 1'ecran graphique de'Dr. LOGO. 

Hexadecimal 

Systeme de nombres a Base 16. Dans le 6128/464 on les precise avec les symboles & ou &h. (Par 
exemple &FF = decimal 255). Voir la premiere partie du chapitre "A vos heures de loisir...". 

Horloge (Clock) 

Pour la synchronisation des operation* de l'ordinateur, horloge interne cnargee de donner L'heure 
reelle,ladate,ete... 

IEEE-488 

Une des interfaces standard permettant de connecter des periphenques a un ordinateur. 

Imprimante 

Dispositif comparable a unermchirieaeCTireautomatique,branch6sur l'ordinateur, afind'obtenir 
sur papier les listings et les textes ddsires. £ 

Imprimante a marguerite 

Imprimante de tres bonne qualite de frappe et dont les caracteres se trouvent sur lea pflales d'une 
marguerite interchangeable en fooction du type d'ecriture voulu. Peu rapides et bruyantes, elles 
sont tout de meme indispensables pour obtenir un courrier de qualite. 
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Imprimante matricielle 

Imprimante avec une grille rectangulaire de points ; la plupart des imprimantes economiques on 
rapides sont de ce type. (1 ' AMSTRAD DMP1 en est une). 

Informatique 

Tout ce qui touche a la manipulation des ordinateurs et de rinfonnation dans son sens large. 

Informatisation du plus grand nombre 

Expression grandiloquente designant la programmation informatique supposant une approche 
structuree et reflechie par opposition aux techniques arbitraires. 

Initialiser 

Demarrer un systfcme on un programme en dtfinissant les valeurs initiates des variables ou les 
caractenstiques initiales de son fonctionnement 

Instruction 

Ordre ou commande donnees a rordinateur pour qu'il effectue une operation particuliere. Un 
aisemble ou une succession destructions forment un programme. 



Instructions (Jeud') 

_es proceeds arithmetiques et logiques accompHs par le microprocesseur composent le jeu 
y instructions. Une simple commande BASIC peut faire appel a des dizaines d 'instructions au 
uveau du microprocesseur. 

Integration a grande e^helle (Large Scale Integration - LSI) 

*oced6 technique qui permet d'integrer sur la meme puce de silicium de plus en plus de portes 
Anentaires de Iogique binaire. 



Intelligence artificielle 

■culte d'un programme a apprendre et analyser une situation ou une t5che precises grace a ses 
-vperiences passees. 



,-nexe2 Page 365 



Interactif 

Un systeme est dit interactif lorsque l'ordinateur a besoin de reponses imroidiates pour continuer 
son programme. Les jeux dependent du mode interactif car Paction du jouenr modifie la suite du 
deroukment du programme. On dit que l'ordinateur travaille en temps reel 

Interface 

Un mot a la mode infonnatique pour designer un lien (physique ou mental) entre l'ordinateur et 
le monde exterieur, y compris l'utilisateur, les interfaces du 6 128/464 sont par exemple le clavier 
entree, l'ecran sortie, etc... 

Interface homme-machine 

Jonction entre rordinateur et I'operateur : clavier, ecran, son, etc... 

Interface paraHele 

Le 6128/464 en a une pour rimprimante : plnsieurs rils paraDeles transmettent des informauons 
en mftne temps, d'ou Padjectif "parallele". 

Interface serie 

Par opposition a la precedente, ne peut traosmettre qu'un bit a la fois d'une mamere sequentieUe, 
la plus commune est appelee RS232. 

Interpr^teur 

Par exemple, l'interpr6teur du 6128/464 interprete le BASIC et le traduit en code machine, hgoe 
par ligne. La 'lenteur" du BASIC vient du fait qu'U traduit la meme ligne plusieurs fois si elle est 
dans une boucle. 

vo 

Input/output, Peqirivalent anglais des emrees/sorties. 

Iteration 

Une des bases de l'ordinateur, qui divise le travail en petits e"lements simples qn'fl rfpete maintes 
et maintes fois. C'est aussi le systemes des boucles. 
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Jeux d'Arcade et d'A ventures 

Eotrc les envahisseurs de l'espace qui font zap, bing bang et tea aveotnrlers qui foot erac, bourn, 
hue, il y en a pour tous les gouts. Les jeux d'aveotures qui mfclent le texte, les graphismes et les 
contes de fees commencent a avoir leurs adeptes. Les Hobbits et le Seigneur des Anneaux y 
cAtoient les chevaliers de la Table Ronde. 



Joker 

Soit *, soit ? Le Dr. LOGO n'accepte que le ? Le joker * remplace n'importe quel nombre de ? 
[Is sont utilises pour bStir des noms de fichiers ambigus. Le ? peut etre n'importe quel caractfere 
ilphanumerique. 



Joysticks 

Alias manettes de jeux. Remplace les fonctions des touches curseur pour une action plus rapide 
lans les jeux. 



K 

„'n K, ou Ko, on encore Kilo Octet, contient 1024 Octets (2 10 ). Votre 6128/464 a 64K de memoire 
ive, c'est-a-dire 65536 Octets (dans le genre 13 a la douzaine). 

Langage evolue* 

engage de programmatioa proche du langage humain, concu en fonction de 1'application a 
^quelle il est destine et qui est pratiquement independant du type d'ordinateur employe*. 

Langage lie" a l'ordinateur 

engage qui doit Cure l'objet d 'un assemblage afln d'etre convert en code machine tequis poor 
i reconnaissance et son execution par un ordinateur particulier. 

Langages 

•j langage machine, seul compris par rordinateur, au langage de haut niveau comme le BASIC, 
c COBOL ou le Pascal, en passant par les langages de bas niveau comme Fassembleur propre a 
zm^k microprocesseur. 

Lecture/Ecriture (Read/Write - R/W) 

•olifie un disque, un fichier ou une unit6 de disquette pennettant la lecture et l'6crihne des 
ranees. 



in oTirimnn 
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Lecture seulement (Read Only - R/O) 

Option aflribuee a une disquette, a un fichier sur disquette on a uae unifc dc facon a proteger les 
donnees qu'il ou qu'elle contient d'uo effacement involontaire. 

LISP (LIST PROCESSOR) 

Nom d'un langage de prograramation fonctionnelle. 

Logiciel (Software) 

Tout ce qui touche aux programmes et a ce qu'on met dans la machine pour la faire tourner. Sans 
lui, votre ordinateur n'est qu'un element decoratif. 

Logiciel integre* 

Voir Firmware 

Nom du grec 'logos" qui signifie "mot", fl est utilisd dans le milieu Sducatif pour l'apprentissage 
de la programmation. 

Lutin (sprite) 

Caracterc pouvant se deplacer libremeot sur l'ecran sans alterer tea representations graphiques 
deja afficbees. 

Manette de jeux 

Voir Joystick 

Materiel 8&V : 

Ensemble des elements physiques employes pour le traitement des donnees. 

Matrice 

Terme utilise en matbematique et en informatiqoe pour representer des arrangements de variables 
dans plusieurs dimensions. Donne une grille de points si on l'utilise dans le sens physique. Tous 
les caracteres sont d6finis sur des matrices, d'ou le nom d'imprimante matricielle. 
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Memoire 

Un ordinateur a sa memoire qui flancne (RAM) et sa memoire ROM qui, elle, est pennanente. 
Bien que Too puisse a la fois lire et ecrire dans la memoire vive RAM, ce qui s'y trouve dispatalt 
quand on coupe le courant. On ne peut que lire ce qu'il y a dans la memoire morte ROM. n y a 
enfin la memoire de masse, representee par les cassettes, les disquettes, disques durs qui sont des 
supports amovibies de l'Moimationm6morisee. 

Memoire (Implantation) ^^ ' - 

L'organisation de la memoire, montrant les differentes adresses et aux fonctions rattribution de 
parties precises de la memoire, de gestion de I'ecran, du systeme d'exploitation, etc. 

Memoire tampon (Buffer) 

Des qu'un ordinateur communique avec un appareil plus lent que lui, il a besoin de tampons pour 
emmagasiner les donnees au fur et a mesure qu'elles sont manipulees. Cest un poste de transit 
emporaire, sur le chemin d'une imprimante ou d'un autre periphenque. 



Menu 

A une liste des differentes options qui peuvent etre executees par le programme de votre 
niinateur, laissees au cnoix de rutilisateur. 



•licroprocesseur 

coeur de l'ordinateur. Un processeur miniaturise dont tous les elements tiennent, en principe, 
. un seul circuit integre qui execute les instructions que lui transmet Pinterpreteur BASIC. 

^ i icroprogramme 

■i Firmware 

(tseau point 

nation des def auts d'un programme qui se manifestent par des anomalies de fonctionnement. 
4«fegraphique 

- carriers micros avaient du mal a melanger texte et grapbiques. Le 61 28/464 Plus le fait avec 
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Modem 

Abreviation de MCktalatenrDBModnlateur ; on l'ntittse poor tea coraramications a distance en ire 
ordinateurs. Cet appareil peut etre a couplage acoustique ou direct Voir aussi : coupleur 
acoustique. 

4 

i 
ModulateurRF 

Dispositif d'encodage et de transmission des signaux video en provenance de l'ordinateur vers la 
prise d'antenne d'un televiseur standard. 

Moniteur 1 

Ecran d6di6 d'un orduiateur, par opposition a un ecran de television qui doit generalement etre 
modify ou adaptd pour afficher les images venant d'un ordinateur. 

Nibble 

Voir Quartet 



Noeuds 

Unit6 de stockage sur l'espace de travail LOGO. Un noend type utilise 4 octets d'espace memoire. 

Nombre a virgule fixe 

Nombre dont la virgule reste a un emplacement specific fixe dans les representations, les 
manipulations eten stockage. 

Nombre reel 

Nombre compost d'un nombre enrier et d'une partie decimale. 

Nombre sans signe 

Nombre sans prefixe indiquant si la valeur est positive on negative. 

Nombres entiers 

Nombres sans partie decimale, par oppositions aux reels constrtoes d'une partie entiere et d'une 
partie decimale. 

^^^_ ; ■*»■' i - ii -mr — »»■ «■ i -m i - ■ ■ •' i i i m i n«i m. ■ ■■ 
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Nom de fichier 

Ed LOGO tin nom de fichier peut contenir buit caracteres alphanumeriques. En CP/M ou en 
AMSDOS, une extension de trois caracteres prec6dee d'un point est permise en plus du nom 
proprementdiL 

Nom de fichier ambigu 

Nom de fichier cootenant un ou plusieurs jokers. Cette ambigulte" est utfiisee pour travailler sur 
plusieurs flcbiers a la fois. 



Notation polonaise inversee (NPI) 

Methode de notation des op6rations arithm&iques ayant la faveur de certains constructeurs de 
calculateurs, ou les operateurs +, -, x, / se placent derriere les valeurs auxquelles Us se rapportent 



Numeriseur 

VoirDigitaliseur 

Numero de ligne 

N'ombres affectes aux lignes des programmes en BASIC et dans d'aulres langages. 

Octal 

Systeme a base 8, ou chaque chiffre (0-8) peut repnSsenter trois bits. 

■ ■ - ■ t 

Octet '■ '* 

jroupementde 8 bits formant la plus petite portion de memoire que l'unite centrale puisse lire ou 
-aire. Le terme byte en est la traduction anglaise. 

Operateur 

^ne ou symbole (+, -, x, qui indlque la nature d'une operation nmtbematique ou logique). 



Organigramme r*mm. m 

.^presentation schematique de la progression des etapes d*un programme et des trartemente 
piques, retracant la sequence des evenements d'un programme. 



,, n . -nrt - i i n i r iB i n i . -rtTiM-au . i iii i i Btfrm ■ -.- ■ , inf ^TTj-fM*if-ih^rirrt--Tririrr-fr. -fgfi' - rfi . 
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Paddle 

Voir Joystick jjihh*-™ 1 : .-■■-;> "-V ^?>r.>- ■ ■ ; - ■". :0"? r>-r ' l -> - 

Page Zero 

Zone de rnemoire cenlrale qui va de Padres* &0000 a Padres* &0100. Cette zone sous CP/M 
est utilisee pour stocker les tres importants parametres systeme. 

Pas de tortue 

Distance minirnale parcounie par une tortue : en general unpixeL 



Pascal 

Langage de haut-niveau, ires prise, qui doit etre compile avant d'etre execute, done tres rapide. 
Constirue bien souvent Petape suivante pour les etudiants du BASIC. 



PEEK 

Fonction BASIC qui lit le cootenu d'une cellule de memoire (octet) designee par son adresse. 

Peripherique 

Tout appareil qui peut se brancher sur un ordinateur. 

Peripherique logique 

Representation d'un peripherique pouvant differer de sa forme physique. Le peripherique logique 1 
duCP/M peut etre associd au port Centronics ou a Punite d'affichage VDU (Video Display Unit). \ 

Penph^rique physique 

Peripherique tangible conespondant * des constituants materiels. n peut etre represente par un 
penpherique logique. 

Pile 

Memoire dont les doncees sont traitees de telle sorte que Particle extrait en premier soit le dernier 
article range, selon le principe dernier entre, premier sortL 



Page 372 ^nexel 



Pistes 

Ordonnees de fa^oa concentrique sur la disquette ; cbaque piste contient ie meme nombre de 
secteurs. Les pistes et les secteurs se faconnent a un endroit specifique au moment du formatage. 

Pistes Systeme 

Pistes reservees pour le CP/M sur une disquette. 

Pixel 

Phis petite partie d'uoe image qu'uo dispositif de visualisation puisse reproduire. 

POKE 

Utilise - en BASIC pour placer une valeur a une adresse memoire specifique. 

Port 

voie d'acces qui pennet d'entrer ou de recueillir des donnees. 

Portabilite* 

,ualit6 d 'un programme qui peut fttre exploite sur plusieurs types d'ordinateurs avec peu (ou pas) 
jf modifications. 



Porte 

~*cuit dectronique qui emploie des composants realises selon une technologic particuliere et 
enembles selon une technique particuliere. n existe plusieurs types de portes (OU, ET, OU 

-.:fusif,etc...). 



^mitive 

TKftbre, operation, commande residente du Dr. LOGO. 

-ocgdure 

^^■Medes instructions autiliserpourresoudre une tache particuliere. 
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Progiciel pr§t a I'emploi 

Expression d&ignant un programme s'executant automatiquemeat des ramorce du systeme. La 
disquette du Dr. LOGO en est un exemple. 

Progiciels 

Programmes d'applications specialement d6velopp6s pour une tache particuliere, prftts a l'eroploi. 
II en existe pour g6rer I'alimentation equilibree des animaux ou, un peu plus cher, une centrale 
atomique. 

Programmation structure 

Technique de programmation logique et pr&tablie qui permet d'obtenir des programmes suivant 
une hierarchie descendante (du g6n6ral au particulier), selon des 6tapes ciairement definies. 

Programme l 

Ensemble d'instructions redigees d'apres un algorithme dans un langage accept par 1' ordinateur. 

Programme ^application i 

A la difference d'un logiciel a caractere general, programme ayantune tache bien precise ai6alisen ^ 
un assembleur, une commande d'imprimante, etc. 



Programme transitoire 

Programmes utilitaires du CP/M, tels que le FILECOPY, qui sont charges en memoire (TPA) et 
executes en entrant leur nom au clavier. 

PROM (Programmable Read Only Memory) 

n s'agit d'une ROM r^grammable. Circuit integrd sur lequel on pent ecrire une seule fois. 

Prompt 

Message court indiquant a roperateur que 1' ordinateur attend quelque chose au clavier (exemple: 
est le prompt de CPM). 



Page 374 Annexe 2 



Protection en ecriture 

Securite' empechant la destruction des donnees sur une disquette. Une disquette protegee en 
ecriture ne peut etre que lue. 



Puce (Chip) 

Plaquette de semi-condocteur de ties petite faille, dans laqueUe ont 6t6 graves les cenfaines ou les 
milliers de transistors et de diodes qui realisent une fonction particuliere. 



Quartet (Nibble) 



II tffl '/: 



Mot anglais signifiant petite bouchee grignotee : il represente quatre bite d'un octet, done un 
demi-octet ("byte" signifie "octet", mais egalement "boucbee"). 



Rafrafchissement 

Operation qui consiste a r6gdn6rer penodiquement les informations contenues dans une memoire 
dynamique constituee de circuits qui perdent rinformation au bout d'un certain temps. 



RAM (Random Access Memory = Memoire Vive - ) 

Memoire sur laquelle on peut ecrire et lire des donnees, un des elements principaux de tout micro. 



RANDOM 

v4ot anglais qui signifie afcatoire. H est souvent utile de pouvoir prodnire des nombres aleatoires. 

wee le 6128/464 on utilise les fonctions RND et RANDOMISE. Le 6128/464 peut generer une 
•iqueoce pseudo-aleatoire. 



RASTER 

rdinique de balayage utitisee pour obtenir une image televised. 

Reconnaissance de la parole 

aversion de la parole en instructions recormaissables par rordinateur. 



econnaissance optique des caracteres (OCR) 

■xxi de reconnattre un caractere d'apres sa forme ecrite ou imprimee et de le coder par 
rtsentation binaire. 
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Recouvrir 

Ecraser une zone de rnemoire en remplacant son contenu avec de nouvelles denudes. 

Recursion 

Fonction qui s'appefle on «e met en jeo d'elte-meme. 
Regis tre 

Endroitde la memoirs da nricroproceMenr (CPU) qui ertutih^ pour stoker tianporaiieineiitdca 
donnees. 

REMarque 

Commentaire qui ne modifie en rien l'execution du programme, bien utile pour comprendre un 
programme quand on ne l'a pas ecrit, ou quand on l*a ecrit et oublie. 

Reseau 

Configuration de deux ou plusieors <>rdinateuTs relies pour ecfaanger des donnees ou des informa- 
tions par cables ou modems. 

Reserve^ (mot) 

Mot-cl£ qui doit etre ecrit sans faute et suivi d'un espace. Par exemple BASIC n'accepte pas le 
mot NEW en tant que variable - e'est deja reserve. 

Resolution 

Capacity a distinguer des Elements d'affichage procnes les uns des antres. 

ROM (Read Only Memory = Memoire Morte - ) 

Mdmoire figee ne pouvant qu'etre lue, ou se trouvent generalement des langages, des systemes 
d'exploitation ou des programmes dont on a frequemment besoin (cartouches ROM). 

Routine (mot anglais) 

Programme ou sous-programme auquel on fait soovent appel. 
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RS232C 

Interface s^rielaphiartpandncotilisfesoilOHt poor lesconimomcatioDS.LesappareilaaBxdeux 
extremites de cette interface doivent etre configures (determines dans leurs echanges) afin de se 

comprendre. 



Saisie des donnees 

Rassemblement et entree des donnees snr nn ordinateur. 



Sauvegarde 

Action de recopier en memoire tout one on partie d'un programme, d'un texte, etc., en cours 
d'elaooration. 



Sectenr 

Bloc de donnees. Le systeme d'exploitation de FAMSTRAD gere des secteurs de 512 octets. 

Separateur 

Le plus souvent, un single espace, mais un signe d' operation peut egalement servir de separateur. 

Simple face 

Disquette dont une seule face est dispomble pour le stockage des donnees. 

Simulation 

Operation qui consiste a representer le eomportement d'un phenomene physique a Faide de 

l'ordinateiir. 

Software 

VoirLogicieL 

Sortie 

Toute donnte qui provient de Fordinateur apres avoir 6te manipulee. Designe aussi les interfaces 
qui permettent de "sortir" les donnees de Fordinateur. 
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Sortie imprimee 

Un^onsur papier d'unp*,*^^^ 
l'ecran s'appelle une visualisation. 

Sous-programme ^ mi , 

Voir Routine 

Synthesede la parole 

Ensernbledetechm^^ 

Table de verite 

Tableau qui indique 1W des sorties d'un circuit de logique binaire, en fonction de r6tat de ses 
entrees. 

Table graphique im r . 

Appareil qui numerise les cooidonnees des points d'un dessin afin qne Mtaftr pmsse lei 
manipuler. 

Tableau (Array) 

Aussi aooel6 table matrice ou grille. Note : il s'agit d'une organisation a une ou plusieurs 
Aussi appeie iamc, ui*u«~ w ©. j„h;~« a*no rhanne. dimension. 



dimensions 



ions. Les donnees sont xefdrencees par leurs indices dans chaque dimension. 



Tableur 

resultats, etc. 

Technologie de rinformation 

Toutetech^queserapportantar^ 

d^mmunications : traitement de textes, communications des donnees, TELETEL, etc... 
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Temps reel 

Mode de traitement qui pennet Tadmission des donnees a un instant quelconque et l'obtention 
immediate des resultats. 

Terminal 

Autre nomd'unclavieravecou sans moniteurqiripcnnetd'"eatrer" des doniieesdansrordinateur 
principal. 

Terminal intelligent * ^ 

Terminal generalementde type conversationnel,dot€demoyeDsinfonnatiques propresqui le rend 
apte au pr6- ou au post-traitement ^ «s 

Terminal non-intelligent iT 

Tenninal d'ordinateur concu pour ernettre ou recevoir des donnees sans traitement Un terminal 
"idiot" ne possede pas de dispositifs 61ectroniques de commande d'affichage. 

TPA (Transient Program Area) 

Zone des programmes transitoires . Une zone memoire qui commence a radresse&OlOOet qui est 
uulisee par les programmes transitoires du CP/M. 

Touche de fonction 

Touche du clavier affectee a une tache specifique qui vient s'ajouter ou remplacer la fonction 
principale indiquee sur la touche. 

Touche programmable 

Voir touches programmables par rutflisatesr . ' ' ' : ' -■■ ■ ' ?* ? 

Touches de contrdle du curseur 

Touches (munies de petites fleches) qui permettent de deplacer le curseur sur 1 'ecran, dans un mm 

ou dans un autre. 

Touches programmables par l'utilisateur 

^e 464/6128 Plus en comporte 32, red6finissables pour Pexecution de taebes multiples. 
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Traceur 

Appareil servant a tracer automatiquemeat des courbes planes parmouvementd'uo stylet encreur. 

i 

Traitement de texte 

Type de programme ou logicieL Indispensable des qo'on veut ecrire une lettre ou rediger un 
document Sa complexite et ses capacites varient en fonction du prix et de l'ordinateur auxquel 
ils sont destines. 

Transfert en aval (download) ! " ' "*" 

Transfer! d'information d'un ordinateur a rautre. L'ardmateor qui recoil les donnees 6tant celui 
en aval et rordinateur emetteur 6tant en amont 

Tronque* : *"^ \ 

Nombre ou chatoe reduits par suppression des caracteres de debut ou de fin. Lorsque la troncature 
est intentionnelle, la valeur peut etre arrondie. Dans le cas contraire, les caracteres en surplus sont 
permettent tout simpkment au nombre ou a la chatoe de correspondre a l'espace dispomble. 

UAL (Unite* Arithm&ique Logique = Arithmetic Logical Unit - 
ALU) 

Partie du microprocesseur qui effectue des operations logiques et aritbrndtiques. Ceux qui 
programment en assembleur ou en langage machine sont directement concents par cette nohon. 

UCT 

VoirCPU 

Unite* de disquette 

Dispositif qui permet d'ecrire et de retrouver les donnees sur une disquette. 

Utilitaire 

Programme sur disquette qui permet a l'utilisateur d'accompUr certaines tacbes (voir Programme 
transitoire). 
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Valeur par deTaut 

Valeur adoptee en l'absence de specification par 1'utilisateur. Sous CP/M I'linitfe A est 1 'unite* par 
d6faut 



Variable 

Caractere ou groupe de caracteres qui represente une valeur. 

Virgule flottante 

Concept informatique utilise* pour repr6senter les nombres de grande taille. 

XYZY 

Mot magique permettant de sortir des situations dedicates suigissant dans les jeux d'aventure. 
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Et pour quelques programmes de plus... 



Amthello 

Le jeu de ceux qui aiment i^flSchir. Essayez de capturer les cases de yotie 
adversaire sans perdre les v6tres ! Un joueur contre 1' ordinateur. Clavier unique- 
ment 

10 'AMTHELLO by M.J. GRIBBINS 

20 'copyright (c) AMSOFT 1984 

30' 

40 BORDER 14 

50 CLEAR 

60 MODE 1:PEN 0:PAPER 1:CLS 

70INK0,0:INK1,14:INK2,18:INK3,26 

80 LOCATE 2,3:PEN 3:PRINT"A":LOCATE S.^PRINTM'iLOCATE 

4,5:PRINTT M :L0CATE 5,6:PRINT'H" nn , tm , , , ^ 

90 LOCATE 6,7:PRINT"E":LOCATE 7,8:PRINrL":LOCATE 8,9:PRINTr:LO- 

CATEg.lOiPRINTO" 

100 WINDOW #1,2,39,22,25: PAPER #1,1:PEN#1,0:CLS#1 

110 PEN0 

120 LOCATE #1 ,8,1 :PRINT #1 ."BLACK ALWAYS PLAYS FIRST" 

130 LOCATE #1,1,3:PRINT #1 ."PRESS B OR W TO CHOOSE BLACK OR 

WHITE" 

140 B$«INKEY$:IF B$- M " THEN 140 

1 50 IF B$-"W" OR B$="W" THEN Q%-3:N%-0:GOTO 210 

160 IF B$- H B" OR B$- H B" THEN Q%«0:N%=3:GOTO 210 

170 CLS #1:LOCATE #1 ,4,3 

180 PRINT #1," BLACK OR WHITE ONLY" 

1 90 FOR T-0 TO 1 000:NEXT T 

200 GOTO 1 40 

210 DIM C%{1 0,10),P%(9,9) t C1%(8),C2%(8),CX%(9),CY%(9) 

220 11 %-2:J1 %-2:l2%-7:J2%-7 

230 FOR l%=0 TO 9 

240 C%(l%,O%)-6:C%(0,l%)-8 

250 C%(9,l%)-6:C%(l%,9)-6 .,,„_ _ ,_, . . 

260 NEXT l% 

270 FOR l%-1 TO 8 

280 READ C1%(I%),C2%(I%) 
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290 FOR J%- 1 TO 8 

300 READ P%(I%,J%) 

310C%(l%,J%)-6 

320 NEXT J%:NEXT l% 

330 C%(4,4)-3:C%(4,5)-0:C%(5,4)-0:C%(5,5)-3 

340FORK%-1TO58 

350 READ AR%,BR%.CR%,DR% 

360 PLOT AR%,BR%:DRAW CR%,DR%,0 

370 NEXT K% .,.. 

380 GOSUB 1460 

390 IF Q%-3 GOTO 770 

400 CLS #1:INPUT #1." WHICH LINE DO YOU WANT ";E% 

410 IF E% <1 OR E% >8 GOTO 400 

420 LOCATE #1 ,1 ,3:INPUT #1 ."WHICH COLMN DO YOU WANT *;D% 

430 IF D% <1 OR D% >8 GOTO 420 

440 IF C%(D%,E%)-6 GOTO 480 

450 CLS #1jLOCATE #1 ,5,2:PRINT #1 ,'THAT SQUARE IS ALREADY OCCU- 

PIED I" 

460 FOR T-1 TO 1000:NEXT T 

470 GOTO 400 

480 PLOT270+(30*D%),70+(30*E%):DRAW 290+(30*D%),89+(30*E%),Q% 

490 PLOT290+(30*D%),70+(30*E%):DRAW 270+(30*D%),89+(30*E%),Q% 

500 GOTO 540 

510 FOR M%- TO 19 STEP 2:PLOT 270+(30*D%),70+M%+(30*E%) 

520 DRAW 290+(30*D%),70+M%+(30*E%),6:NEXT M% 

530 GOTO 400 

540 VRX%-0 

550 FOR K%-1 TO 8 

560 VR%-0:C3%-D%:C4%-E% 

570 C3%-C3%+C1 %(K%):C4%-C4<Kh-C2%(K%) 

580 IF C%(C3%,C4%)=N% GOTO 590 ELSE 600 

590 VR%-VR%+1 :GOTO 570 

600 IF C%(C3%,C4%)-6 GOTO 610 ELSE 620 

610 NEXT K%:GOTO 670 

620 IF VR%-0 GOTO 610 ELSE 630 

630 VRX%-VRX%+VR% 

840 C3%-C3%-C1%{K%):C4%-C4%-C2%(K%) 

650 IF C%(C3%,C4%)«6 GOTO 810 ELSE 660 

660 C%(C3%,C4%)-Q%:GOTO 840 

670 IF VRX%-0 GOTO 680 ELSE 710 

680 CLS #1:PRINT #1/THIS IS NOT A POSSIBLE CHOICE" 

690 FOR T-1 TO 1 000: NEXT T 

700 GOTO 510 
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710 E%-E%:D%-D%:VRX%-VRX% 

720 CLS #1 :PRlNT #1 ,"YOU HAVE PLAYED LINE NUMBER";E% 

730 PRINT #1," AND COLUMN NUMBER ";D% 

740 LOCATE #1,2,4:PRINT #1/THAT GIVES YOU ";VRX%;" SQUARES(S)" 

750 C%(D%,E%)-Q%:GOSUB 1710 

760 GOSUB 1460 

770 CLS #1:LOCATE #1,10,2:PRINT#1, ,, NOW ITS MY TURN ...I" 

780 P%-0:VRX%-0:VRY%-0 

790 IF 11%*J1%-1 AND l2%*J2%-64 GOTO 860 

800 FOR K%-2 TO 7 

810 IF C%(2,K%) o 6 THEN I1%-1 

820 IF C%(7,K%) o 6 THEN l2%-8 

830 IF C%(K%,2) o 6 THEN J1%-1 

840 IF C%(K%,7) o 6 THEN J2%-8 

850 NEXT K% 

860FORI%-I1%TOI2% 

870FORJ%-J1%TOJ2% 

880 IF C%(l%,J%)-6 GOTO 1030 

890NEXTJ%:NEXTI% 

900 IF P%>0 GOTO 1000 

910 IF PAS%-1 GOTO 920 ELSE 940 

920 CLS #1:PRINT #1," DEADLOCK 1 1 MUST PASS ALSO.GAME OVER" 

930 FOR T-1 TO 1 000:N EXT T: GOTO 1550 

940 CLS#1:LOCATE#1 ( 18,2:PRINT#1,"l MUST PASS" 

950 GOSUB 2720 

960 IF PAS%-1 GOTO 970 ELSE 990 

970 CLS #1 PRINT #1 /'DEADLOCKI YOU MUST PASS ALSO.GAME OVER" 

980 FOR T-1 TO 1000:NEXT T:GOTO 1550 

990 GOTO 400 

1000 IF LC%-0THEN LC%-1: RANDOMIZE LC%:RL%-RND(LC%) 

1 01 CX1%-CX%(RL%):CX2%-CY%(RL%) 

1020 GOTO 1220 

1030VRX%-0 

1040FORK%-1TO8 

1 050 VR%=0:C3%-l%:C4%=J% 

1 060 C3°/o~C3 t y f ^C1 %(K%):C4%-C4%+C2 < ?o(K%) 

1070 IF C%(C3%,C4%)-0% THEN GOTO 1080 ELSE 1 090 

1 080 VR%-VR%+1 :GOTO 1 060 

1 090 IF C%(C3%,C4%)-6 GOTO 1 1 00 ELSE 1110 

1100 NEXT K%:GOTO 1130 

1110IFVR%-O%GOTO1100ELSE1120 

1 120 VRX%=VRX%+VR%:GOTO 1 100 

1130 IF VRX%-0 GOTO 890 

1140 IF P%(I%,J%)< P% GOTO 890 

1 150 IF P%(I%,J%)> P% GOTO 1 1 60 ELSE 1 1 70 
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1 160 P%i-P%0%,J%):VRY«M^VRX%:LC%-0:CX%(0)-l%:CY%(0)-J%:GOTO 

890 

1 170 IF VRY% > VRX% GOTO 890 

1 180 IF VRY% < VRX% GOTO 11 90 ELSE 1 200 

1 1 90 LC%-0:VRY%-VRX%:CX%(0H%:CY%(0)-J%:GOTO 890 

1 200 LC%-LC%+1 :CX%(LC%H%:CY%(LC%)«J% 

1210 GOTO 890 

1220 CX2%-CX2%:CX1 %-CX1 %:VRY%-VRY% 

1230 CLS #1:PRINT #1 ," I CHOOSE LINE NUMBER ";CX2% 

1240 PRINT #1," AND COLUMN NUMBER ";CX1% 

1250 LOCATE #1 P 1 P 4:PRINT #1,'THAT GIVES ME ";VRY%;" SQUARE(S)" 

1260 PLOT 270+(30*CX1%),70+(30*CX2%):DRAW 

290+(30*CX1%),89+(30*CX2%),N% 

1270 PLOT 290+(30*CX1%),70+(30*CX2%):DRAW 

270+(30*CX1 %),89+(30*CX2%),N% 

1280 FOR T-1 TO1000:NEXTT 

1290 FOR K%-1 TO 8 

1300 VR%-0-C3%-CX1 %:C4%-CX2% 

131 C3%-C3%*C1 %(K%):C4%-C4%+C2%(K%) 

1320 IF C%(C3%,C4%)-Q% GOTO 1330 ELSE 1340 

1330 *VR%-VR%+1:GOTO 1310 

1340 IF C%(C3%,C4%)-6 GOTO 1350 ELSE 1360 

1350 NEXT K%:GOTO 1400 

1360 IF VR%=0 GOTO 1350 

1370 C3%-C3%-C1 %(K%):C4%-C4%-C2%(K%) 

1 380 I F C%{C3%,C4%)- 6 GOTO 1 350 

1390 C%(C3%,C4%)-N%:GOTO 1370 

1400 C%(CX1%,CX2%)-N% 

1410 GOSUB 2720 

1420 GOSUB 1460 

1430 IF PAS%-1 GOTO 1440 ELSE 1450 

1440 CLS #1:PRINT #1" YOU MUST PASS n :FOR T-1 TP 1000:NEXTT:GOTO 

770 

1450 GOTO 400 

1460FORI%-1TO8 

1470 FOR J%-1 TO 8 

1480 FOR M%-0 TO 19 STEP 2 

1 490 Z%-270+(30* l%) : H%=70+(30*J%):W%-H%+M% 

1 500 PLOT Z%,W%:DRAW 2%+20,W%,C%(l%,J%) 

1 51 NEXT M%;NEXT J%:NEXT l% 

1520X%-X%+1 

1530IFX%-61 GOTO 1550 

1540 RETURN 

1550CQ%-0:CN%-0 
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1560FORI%-1TO8 

1570FORJ%-1TO8 

1 580 I F C%(l%, J%)-Q% THEN CQ%-CQ%+1 

1590 IF C%(I%,J%)-N%THEN CN%-CN%+1 

1600 NEXT J%:NEXTI% 

1610 IF CQ% CN% GOT0 1680 

1620 IF CQ%=CN% GOTO 1630 ELSE 1650 

1630 CLS #1 :LOCATE #1 ,25,2:PRINT #1 ."DEADLOCK" 
1650 CLS #1:LOCATE #1 ,5,1:PR.NT #1 /YOU HAVE ";CQ%;" SQUARES;! 
XoloCAT°E #1 ,1 1 ,3:PRINT #1 .1 HAVE WON..-!!!!" 
1^CLS#1:LOCATE#1,5.1:PRINT#1,YOUHAVE-;CQ%;« SQUARES;. 

"6 A S N ATE #1 ,5,3:PRINT #1 ."WELL DONE. YOU HAVE WON II" 

ml , E F N C%(2.2)^% AND <C%(3,1)-N%OR C%(1,3)-N%) GOTO 1720 ELSE 

1730 

173SrS} 1 ^^D(C % (8,6,.N%ORC%(6,8)-N % )GO TO 1740ELS E 

1750 
1 , 7 7 4 5 0r F , '& 1 ^^D(C % (1,6,-N%ORC%(3,8,.N%,GOTO1760E L S E 

1770 
177S^^^D(C%(6,1,.^ORC.o,8,3K N %)GO TO 1780ELS E 

1790 

]Z7°^m^OHE^ OR E%-8 GOTO 182C , 

!m IF 3h%-1 OR CX1%-8 OR CX2%-1 OR CX2%-8 GOTO 1820 

1810 RETURN 

1 820 FOR J%-1 TO 8 STEP 7 

1 830 FOR l%-2 TO 7 

1840 IF C%(!%,J%)-N% GOTO 1850 ELSE 1860 

1850 P%(I%+1,J%)-21/P%(I%-1.J%)-21 

1860 IF C%(J%,I%)=N% GOTO 1870 ELSE 1880 

1870 P%(J%,1%+1)-21;P%(J%,I%-1)-21 

1880 NEXT l% 

1890 FOR l%-2 TO 7 

1900 IF C%(I%,J%)=Q% GOTO 1910 ELSE 1920 

1910P%(l%+1,J%)-2:P%(l%-1,J%)-2 

1920 IF C%(J%,I%)-Q% GOTO 1930 ELSE 1940 



C4 nrtur ntioiniiAR nroarammes de plus 
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1930 P%(J%J%+1)-2:P%(J%,l%-1)-2 

1940 NEXT l%:N EXT J% 

1 950 P%(1 ,2)-1 :P%(1 ,7)-1 : P%(2,1 )-1 :P%(7,1 )-1 

1 960 P%(2,8)-1 :P%<7,8)-1 :P%(8,2)-1 :P%{8,7)-1 

1970FORI%-2TO7 

1 980 IF C%(1 ,l%-1 )-Q% AND C%(1 ,I%+1)-Q% THEN P%(1 ,l%)=25 

1990 IF C%(8,l%-1)-Q% AND C%(8,I%+1)=Q% THEN P%(8,l%)=25 

2000 IF C%(I%-1,1)=Q% AND C%(l%+1,1)-0% THEN P%(l%,1)-25 

2010 IF C%(l%-1 ,8)-Q% AND C%(l%+1 ,8)-Q% THEN P%(l%,8)-25 

2020 NEXT l% 

2030 FOR J%=1 TO 8 STEP 7 

2040 FOR l%-4 TO 8 

2050 IF C%(J%,I%) o N% GOTO 2140 

2060 IC%-I%-1:IF C%(J%,IC%)-6 GOTO 2140 

2070 IF C%(J%,IC%)-Q% GOTO 2080 ELSE 2090 

2080 IC%»IC%-1:GOTO 2070 

2090 IF C%(J%,IC%)=6 GOTO 21 10 

2100 GOTO 2140 

2110 IF IC%-0 GOTO 2140 

2120 IF C%(J%,I%+1)=Q% AND C%(J%,IC%-1)-6 GOTO 2140 

2130P%(J%,IC%)=26 

2140 IF C%(I%,J%) o N% GOTO 2230 

21 50 IC%=I%-1 :IF C%(IC%,J%)-6 GOTO 2230 

2160 IF C%(IC%,J%)=Q% GOTO 2170 ELSE 2180 

2170 IC%-IC%-1:GOTO 2160 

21 80 IF C%(IC%,J%)=6 GOTO 2200 

21 90 GOTO 2230 

2200 IF IC%-0 GOTO 2230 

221 IF C%(l%+1 ,J%)=Q% AND %(IC%-1 ,J%)-6 GOTO 2230 

2220 P%(IC%,J%)-28 

2230 NEXT l% 

2240 FOR l%-1 TO 5 

2250 IF C%(J%,I%) O N% GOTO 2340 

2260 IC%-I%+1 :IF C%(J%,IC%)-6 GOTO 2340 

2270 IF C%(J%,IC%)-Q% GOTO 2280 ELSE 2290 

2280 IC%:IC%+1:GOTO 2270 

2290 IF C%(J%,IC%)=6 GOTO 2310 

2300 GOTO 2340 

231 IF IC%-9 GOTO 2340 

2320 IF C%(J%,I%-1)-Q% AND C%(J%,IC%+1)-6 GOTO 2340 

2330 P%(J%,IC%)-26 

2340 IF C%(I%,J%) O N% GOTO 2430 

2350 IC%-I%+1 :IF C%(!C%,J%)=6 GOTO 2430 
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2360 IF C%(IC%,J%)-Q% GOTO 2370 ELSE 2380 

2370 IC%-IC%+1:GOTO 2360 

2380 IF C%(IC%,J%)-6 GOTO 2400 

2390 GOTO 2430 

2400 IF IC%-9 GOTO 2430 

241 IF C%(l%-1 ,J%)-Q% AND C%(IC%+1 ,J%)-6 GOTO 2430 

2420 P%(IC%,J%)-26 

2430 NEXT l%:N EXT J% 

2440 IF C%(1 ,1 )-=N% GOTO 2450 ELSE 2480 

2450 FOR l%-2 TO 6:P%(1,I%)-20:P%(I%,1)-20:NEXT 1% 

2460 IF C%(1 ,8)-N% GOTO 2470 ELSE 2480 

2470 FOR l%-2 TO 6:P%{I%,8)-20:P%(1 ,9-l%)-20:NEXT l% 

2480 IF C%(8,1)-N% GOTO 2490 ELSE 2500 

2490 FOR l%-2 TO 6:P%(9-I%,1)-20:P%(8,I%)-20:NEXT l% 

2500 IF C%(8,8)-N% GOTO 2510 ELSE 2520 

2510 FOR l%-3 TO 7:P%{I%,8)-20:P%(8,I%)-20:NEXTI% 

2520 I F C%(1 ,1)o6 THEN P%(2,2)-5 

2530 IF C%(1 ,8) O 6 THEN P%(2,7)-5 

2540 IF C%(8,1) O 6 THEN P%(7,2)-5 

2550 IF C%(8,8) O 6 THEN P%{7,7)-5 

2560P%(1,1)-30:P%(1,8)-30:P%{8,1)-30:P%(8,8)-30 

2570 FOR l%*-3 TO 6 
2580 IF C%(1 ,1%)-N% THEN P%(2,l%)-4 
2590 IF C%(8,l%)-N% THEN P%(7,l%)«4 
2600 IF C%(l°/o,1)=N% THEN P%(l%,2)-4 
2610 IF C%(I%,8)=N% THEN P%(l%,7)-4 

2630 IF C%(7°1)-G% AND C%(4,1)-N% AND C%(6,1)-6 AND C%(5,1)-6 

2640 IF C°%(1 ,7)=Q% AND C%(1 ,4)-N% AND C%(1 ,6)=6 AND C%(1 ,5)-8 

26^I^(£\k2% AND C%(5,1)-N% AND C%<3,1)-6 AND C%(4,1)-8 

2660 IF C°%0 J)-Q% AND C%(1,5)-N% AND C%(1 ,3)«6 AND C%(1,4)-6 

2670 IF C%(8,2HQ% AND C%(8,5)-N% AND C%<8,3)=6 AND C%(8,4)-6 

2680 IF C°%(2,8)-Q% AND C%(5,8)-N% AND C%(3,8)=6 AND C%(4,8)-6 

t i irr fci DQ/ /O Q\— Oft 

2690 IF C%(8 J)-Q% AND C%(8,4)-N% AND C%(8,5)-6 AND C%(8,6)-6 

27^0 IF C%(7.8)-Q% AND C%(4,8)-N% AND C%(5,8)-6 AND C%(6,8)-6 
THEN P%(6,8)-26 
2710 RETURN 
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2720 PAS%-0 

2730FORI%-1TO8 

2740 FOR J%-1 TO 8 

2750 IF C%(I%,J%)-Q% GOTO 2780 

2760 NEXT J%:NEXTI% 

2770 PAS%-1: RETURN 

2780 FOR K%-1 TO 8 

2790 VR%=0:C3%~I%:C4%-J% 

2800 C3%-C3%+C1 %(K%):C4%-C4%+C2%(K%) 

281 IF C3% < 1 OR C3% > 8 GOTO 2820 ELSE 2830 

2820 NEXT K%:GOTO 2760 

2830 IF C4% < 1 OR C4% > 8 GOTO 2820 ELSE 2840 

2840 IF C%(C3% r C4%)-N% GOTO 2850 ELSE 2860 

2850 VR%-VR%+1 :GOTO 2800 

2860 IF C%(C3%,C4%)=Q% GOTO 2820 ELSE 2870 

2870 IF VR% > THEN RETURN 

2880 GOTO 2820 

2890 DATA 1 ,0,30,1 ,20,1 0,1 0,20,1 ,30,1 ,1 ,1 ,1 ,3 

2900 DATA 3,3,3,1 ,1 ,0,1 ,20,3,5,5,5,5,3,20,-1 ,1 .1 0,3,5 

291 DATA 0,0,5,3, 1 0,-1 ,0,1 0,3,5,0,0,5,3,1 0,-1 

2920 DATA -1 ,20,3,5,5,5,5,3,20,0,-1 ,1 ,1 ,3,3,3,3,1 ,1 ,1 ,-1 ,30,1 ,20,1 0,1 0,20,1 ,30 

2930 DATA263.100 ,263,120,270,130,255,130,255,130,255,140,255,140, 

270,140 

2940 DATA 270, 1 40,270,1 50,270,1 50,255,1 50,255, 1 60,270,1 60,270,1 60, 

270,180 

2950 DATA 270,1 80,255,1 80,270,1 70,255,1 70,270, 1 90,270,2 1 0,270,200, 

255,200 

2960 DATA 255,200,255,210,255,220,270,220,270,220,270,230,270,230, 

255,230 

2970 DATA 255,230,255,240,255,240,270,240,255,250,270,250,270,250, 

270,260 

2980DATA270,260,255,260,255,250,255,270,270,280,270,300,270,300, 

255,300 

2990 DATA 255,31 0,255,330,255,330,270,330,270,330,270,31 0,270,31 0, 

225,310 

3000 DATA 255,320,270,320 

3010 DATA 31 0,355,310,375,350,355,335,355,335,355,335,365,335,365, 

350,365 

3020 DATA 350,365,350,375,350,375,335,375,365,355,380,355,380,355, 

380.375 

3030 DATA 380,375,365,375,380,365,365,385,41 0,355,41 0,375,410,365, 

395,365 

3040 DATA 395,365,395 ,375,425,355,440,355,440,355,440,365,440,365, 

425,365 
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3050DATA425,365,425,375,425,375,440,375,455,375,455,355,455,355, 

470 355 
306bDATA470,355,470.365 1 470,365,455,365,485,375,500 r 375,500,375, 

3070^515,375,515,355,515,355,530,355,530,355,530,375,530,375, 

515,375 

3080 DATA 51 5,365,530,365 
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Arsfcne Lupin 

H s'agit de s'introduire dans la maison de Sa Seigneurie et d'y derober le butin. 
Vous devez franchir une multitude d'obstacles et eViter le chien ! Se joue seul 
contre Pordinateur, a partir du clavier ou avec les manettes. 

10 'ARSENE LUPIN PAR DAVID RADISIC 

20 'copyright (c) AMSOFT 1985 

30 ' 

40 MODE 0:lNK 0,0:BORDER 0:INK 1 ,26:INK 2,1 5:INK 3,25 

50 INK 4,14:INK 5,24:INK 6,0:INK 7,0:INK 8,0:PAPER #1,7 

60 delais-200 

70 DIM objx(5,20),objy(5,20),gemx(5,20),gemy(5,20) 

80 GOSUB 380 

90 GOSUB 720 

100 pause-200:GOSUB 340 

1 1 IF gems=0 THEN GOSUB 970 

120 PEN 4 

130FORi=10TOl2 

140 LOCATE 15,i:PRINr'butin"; 

150 NEXT 

160 PAPER 0:CLS #2:PAPER 8 

170 GOSUB 1170 

180 GOSUB 1230 

190 GOSUB 1370 

200 GOSUB 1510 

210 IF rm-0 THEN GOSUB 1900 

220 IF morM) THEN 160 

230pause-100:GOSUB340 

240 PAPER 0:CLS:PEN 1 

250 LOCATE 5,3:PRINTVoulez-vous"; 

260 LOCATE 7,5:PRINT M rejouer"; 

270 PEN 5:LOCATE 9,7:PRINT"0/N"; 

280 i$=UPPER$ (INKEY$):IF i$o"0" AND i$o"N" THEN 280 

290 IF i$="N" THEN MODE 2:PEN 1:STOP 

300 RUN 

310 IF chien-1 THEN RETURN 

320chien-1:chienx«minx(rm):chieny-mlny{rm) 

330 RETURN 

340 FOR loop-1 TO pause 

350 FRAME 

360 NEXT 

370 RETURN 

380 rm-1:xp-6:yp-4:homme$-CHR$(224):chien-0:vol'-0 
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390 SYMBOL 240,8,8.8,8,8,8,8,8 
400 SYMBOL 241 ,0,0,0,0,255,0,0,0 
410 SYMBOL 242,0,0,0,0,1 5,8,8,8 
420 SYMBOL 243,0,0,0,0,248,8,8,8 
430 SYMBOL 244,8,8,8,8,248,0,0,0 

440 SYMBOL 245,8,8,8,8,1 5,0,0,0 
450 SYMBOL 246,8,1 2,1 3,1 4,1 2,1 2,8,8 

460 SYMBOL 247,8,1 2,1 2,1 4,1 3,1 2.8,8 
470 SYMBOL 248,8,24,88,56,24,24,8,8 
480 SYMBOL 249,8,24,24,56,88,24 8 8 
490 SYMBOL 250,0.0,255,255,255,255,255,0 
500 SYMBOL 251 ,28,20,20,20,20,20,20 28 
51 SYMBOL 252,0,0,255,255,255,255,255,0 
520 SYMBOL 253,28,28,28,28,28,28,28 28 
530SYMBOL255,195,165,60,126,90,60,36,24 

540 ENT 1,12,-4,1 

550 ENT -2,-1 000,60,-3000,40 

S53 + CHR$(8, + CHR$(10HCHR$(2W 

CHR$(25^ + CHR$(250) + CHR$(251)^em$^bl$ + ch.en$ 

630 RESTORE 3010 
640 FOR i-1 TO 5 m 

650 READ minx(i),minyO),maxx(i),maxy(l) 
660 READ dir(i,1),dir(i,2),dir(i,3),dir(l,4) 

Sw^DOW#1,minx(^ 

690 WINDOW #2,1 ,14,1 ,25 

700CLS#1:PAPER#0,8 

710 RETURN 

720 ORIGIN 50,50 

730 INK 6,24,1 2 

740 RESTORE 3060 

750 GOSUB 1280 

760 LOCATE 2,20 

770 PEN 5:PRINT"-"; 

780 PEN 1 tPRINT" echappatoires"; 

790 PEN 5:PRINT'-"; 
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800 LOCATE 8,2:PRINT"entree N ; 

810 pause-300:GOSUB 340 

820 CLS: LOCATE 1 ,3: INK 6,0 

830 PEN 1 :PR!NT horn me$;" A. Lupin(vous) H :PRINT 

840 PEN 2: PRINT LEFT$(porte$(1),1);LEFT$(porte$(2),1);"portes":PRINT 

850 PEN 3:PRINT inter$(1,0);inter$(2,0);"interrupteureteint" 

860 PEN 3:PRINTinter${1,1);irrter$(2,1);"interrupteur allume":PRINT 

870 PEN 4:PRINT LEFT${fenet$(1),1);LEFT$(1enet$(2},1); n fenetres' , :PRINT 

880 PEN 5:PRINT gem$; M bijoux": PRINT 

890 PAPER 1:PEN 0:PRlNT obj$;" obstacles":PEN 1:PAPER 0:PRINT 

900 PEN 1 :PRINT chien$;" le chien" 

910PEN5:PRINT:PRINT 

920 PRINTutflteez le joystJck^PRINT' ou les touches H :PRINT" flechees" 

930feint-REMAIN(1) 

940 AFTER delais*4,1 GOSUB 340 

950 RETURN 

960' 

970 'GENERATEUR DE RUBIS/OBSTACLES 

980* 

990 FOR piece-1 TO 5 

1000gemr-INT(RND*8)+2:objr-INT(RND*10)+5 

101 minx-minx(pfece):miny-miny(piece):maxx-maxx{plece):maxy- 

maxy (piece) 

1020 FOR i-1 TO gem r 

1030x-INT(RND*(maxx-minx+1))+minx 

1040y-INT(RND*(maxy-miny+1))+miny 

1050gemx(piece,i)-x:gemy(piece,i)«y 

1 060 gems-gems+1 

1070 NEXT i 

1080 FOR i-1 TOobjr 

1090x-INT{RND*(maxx-minx+1))+minx 

1100y-INT(RND*(maxy-miny+1))+miny 

1110 objx(piece 1 i)-x:objy(piece,i)-y 

1120NEXTi 

1 1 30 gems(piece)-gemr:obj(ptece)-objr 

11 40 NEXT piece 

1150 CLS 

1160 RETURN 

1170 ON rm GOTO 1180,1190,1200,1210,1220 

1 180 RESTORE 2670: RETURN 

1 190 RESTORE 2740: RETURN 

1200 RESTORE 281 0:RETURN 

1210 RESTORE 2880:RETURN 

1220 RESTORE 2980.RETURN 
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1230 PAPER 0:READ rm$:PAPER 8 ..„ Q|1 

1240 WINDOW #1 ,minx{rm)-1 ,maxx(rm)+l ,mmy(rm)-1 ,maxy(rm)+l :GLb ffi 

1250 PEN 1:L0CATE 1,1:PRINTSPACE$(19); 

1260 LOCATE 1,1:PRINT'piece:";rm$; 

1270 IF lumiere(rm) THEN INK 7,1 0:INK 8,10 ELSE INK 7,0:INK 8,0 

1280 READ a$:lF a$-"END" THEN RETURN 

1290 IF a$-"D" THEN 2180 

1300 IF a$-"W" THEN 2260 

1310 IF a$= H L" THEN GRAPHICS PEN V.GOTO 2340 ^ 

1320 IF a$-"S" THEN 2420 ^ 

1330 IF a$="P THEN GRAPHICS PEN 6.GOTO 2340 

1340 PRINr***erreur*** H ; 

1350 STOP 

1360' 

1370 'AFFICHAGE BIJOUX/OBJ ETS 

1380' 

1390 PEN 6 

1400 FOR 1-1 TOobj(rm) 

141 LOCATE objx(rm,i),objy(rm,i) 

1420 PRINT obj$; 

1430 NEXT 

1440 PEN 5 

1450 FOR i-1 TO gems(rm) 

1460 LOCATE gemx(rm,i),gemy(rm,i) 

1470PRINTgem$; 

1480 NEXT 

1490 PEN 1:LOCATE xp,yp:PRINT homme$; 

1500 RETURN 

15l0xt-0:yf=0:PEN1 

1520 IF INKEY(0)<^1 OR INKEY(72)<^1 THEN yf=-1 

1530 IF INKEY(2)o-1 OR INKEY(73)o-1 THENyf-1 

1540 IF INKEY(8)o-1 OR INKEY(74)<^1 THEN xf=-1 

1550 IF INKEY(1)<^1 OR INKEY(75)<^1 THEN xf-1 

1560 IF xf-0 AND yf-0 THEN 1 630 

1570 LOCATE xp+xf,yp+yf:ht$=COPYCHR$(#0) 

1580 IF ASC(ht$>239 AND ASC(ht$)<246 THEN 1510 

1590 !Fht$o" 'THEN 1680 

1600 LOCATE xp,yp:PRINT " "; 

1610 PAPER 0: LOCATE 15,5:PRINT" ";:PAPER8 

1 620 xp-xp+xf :yp-yp+yf 

1 630 LOCATE xp,yp:PRINT homme$; 

1640 IF chien>0 THEN chien-chien MOD 2+1 :IF chien -2 THEN 2550 

1650 GOTO 1510 

1 660 coup- 1 N STR (coup$,ht$):char-ASC(MI D$(ooup$,coup,1 )) 
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1670 ON coup GOTO 

1 690,1 690,1 690,1 690,1 750,1 750,1 850,1 900,1 970,2090,2650 

1680 GOT0 1600 

1690 IF coup>2 AND coup<5 THEN char-char-1 

1700 IF coup<3 THEN char-char+1 

1710 PEN 3:LOCATE xp+xf.yp+y* PRINT CHR$(char); 

1 720 lumiere(rm)-lumiere(rm) XOR 1 

1 730 IF lumiere(rm) THEN INK 7,10:INK 8,10 ELSE INK 7,0:INK 8,0 

1740 GOTO 1510 

1750 IF xfoO AND yfoO THEN 1630 

1760 IF xf<0 THEN dir-4 ELSE IF xf>0 THEN dir-3 

1 770 IF yf<0 THEN dir-1 ELSE IF yfoO THEN dir-2 

1780 IFdir (rm,dir)=-1 THEN 1630 ELSE rm-dir(rm.dlr) 

1790 IF chiert>0 THEN GOSUB 310 

1800 IF dir-1 THEN xp-6:yp-maxy(rm) - : 

1810 IF dir-2 THEN xp~6:yp-miny(rrn) - 

1 820 I F dir=3 TH EN xp=minx(rm):yp-1 3 

1830 IF dir-4 THEN xp=maxx(rm):yp-13 

1840 RETURN 

1850 IF xp>5 AND xp<8 THEN 1880 

1860 IF xp<6 THEN dir-4 ELSE dir-3 

1870 GOTO 1780 

1880 IF yp>13 THEN dir-2 ELSE dir-1 

1890 GOTO 1780 

1900 PAPER 0:CLS:PEN1 

191 LOCATE S^PRINTvous vous en tlrez T; 

1920 LOCATE 9,5: PRINT"avec"; 

1930 IF gems-vol THEN LOCATE 8,7:PRINTTOUT !"; ELSE LOCATE 9,7 

1940 PRINT USING "##";vol; 

1950 PEN 5:LOCATE 8,9:PRINT "Bijoux M ; 

1960 mort-1: RETURN 

1970 LOCATE xp,yp:PR INT" n ;:xp-xp+xf:yp-yp+yf 

1980i-0 

1990W+1 

2000 IF t>gems(rm) THEN 1510 

2010 IF gemx{rm,i)<oxp OR gemy(rm,i)oypTHEN 1990 

2020 IF i-gems(rm) THEN 2050 

2030 gemx(rm,i)-gemx(rm,gems(rm)) 

2040 gemy{rm,i)=gemy{rm,gems(rm)) 

2050 gems(rm)-gems(rm)-1 :vo!=vol+1 

2060 MOVE 400,1 50+(vol*2),1 ,1 :DRAW 580,1 50+ (vol*2),1 ,1 

2070 SOUND 129,248,10,12,0,1 

2080 GOTO 1980 
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2090brult-INT(RND*15) 

2100 SOUND 1 ,3000,1 p brutt0,0,10 

2110 PAPER 0:LOCATE 15,5:PRINT"CRACK!";:PAPER8 

2120 IF bruit<10 OR delais-50 THEN 1630 

21 30 delais-delais-50 

2140feint-REMAIN(1) 

2150 AFTER delais*4,1 GOSUB 310 

2180 GOTO 1630 

2170' 

2180 ' DESSIN DES PORTES 

2190' 

2200 READ no,dr$ 

221 IF dr$-"V" THEN dr-2 ELSE dr-1 

2220 PEN 2 

2230 pic$-porte$(dr):GOSUB 2500 

2240 GOTO 1280 

2250 » 

2260 ' DESSIN DES FENETRES 

2270' 

2280 READ no,wi$ 

2290 IF wi$-"V" THEN wi-2 ELSE wi-1 

2300 PEN 4 

231 pic$-fenet$(wi):GOSUB 2500 

2320 GOTO 1280 

2330' 

2340 ' TIRE LES TRAITS 

2350 ' 

2360 READ x1.y1,x2,y2 

2370 MOVE x1,y1„0 

2380 DRAW x1,y2„0:DRAW x2,y2„0 

2390 DRAW x2,y1„0:DRAW x1,y1„0 

2400 GOTO 1280 

2410' 

2420 ' DESSINE LES INTERRUPTEURS 

2430' 

2440 READ no ,sw$ 

2450 I F sw$- H L'THEN 8W-1 ELSE sw-2 

2460 PEN 3 

2470 pic$-inter$(sw,0):GOSUB 2500 

2480 GOTO 1280 

2490' 

2500 ' AFFICHE LE CARACTERE 

2510' 

2520 READ x,y:LOCATE x,y:PRINT plc$; 

2530 no-no-1 :IF no>0 THEN 2520 
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2540 RETURN 

2550 PEN 1:LOCATE chienx,ch*reny:PR1NT" "; 

2560 homme$-CHR$(225) 

2570 IF {chienx-xp AND chieny-yp) OR (chienx-xp+xf AND chleny-yp+yf) 

THEN 2650 

2580 IF chienx<xpTHEN chienx=chienx+1 

2590 IF chienx>xp THEN chienx-chienx-1 

2600 IF chieny<yp THEN chieny-chieny+1 * :.■ 

261 IF chieny>yp THEN chieny-chieny-1 

2620 LOCATE chienx,chieny:PRINT chien$; 

2630 SOUND 1,0,RND*40,1 0,1, 2,31 

2640 GOTO 1510 

2650 PRINT"SNAP !"; 

2660mon>1:RETURN 

2670 DATA entree 

2680 DATA L.64,308,226,4 

2690 DATA D,2,H ,6,3,6,22 

2700 DATA D,2,V,4,12,9,11 

2710 DATA S,1,L,4,11 

2720 DATA S,1,R,9,14 

2730 DATA END 

2740 DATA SALON 

2750 DATA L,2,308,258,4 

2760DATAD,1,V,10,12 

2770 DATA W,1,H,6,3 

2780DATAW,1,V,2,12 

2790 DATA S,2,R,10,1 1,10,15 

2800 DATA END 

281 DATA SALLE A MANGER 

2820 DATA L,2, 308,258,4 

2830DATAW,1,V,10,12 

2840 DATA W,1,H, 6,3 , 

2850 DATA D,1,V,2,12 

2860 DATA S,2,L,2,1 1,2,15 

2870 DATA END 

2880 DATA CUISINE 

2890 DATA L,2,276,384,4 

2900 DATA D,2,H,6,5,6,22 

2910 DATA W,1,H,1 0,22 

2920 DATA W,1,V,14,13 

2930DATAD,1,V,2,13 

2940 DATA S,1,L,2,16 

-950 DATA END 

:*60 DATA LINGERIE 
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2970 DATA 1,2,276,256,4 
2980 DATA D.1.V.1 0,12 
2990 DATA S,1,R,1 0,11 
3000 DATA END 
3010 DATA 5,4,8,21,0,4,3,2 
3020 DATA 3,4,9,21 ,-1 ,-1 ,1 ,-1 
3030 DATA 3,4,9,21 ,-1 ,-1 ,-1 ,1 
3040 DATA 3,6,1 3,21, 1,0,-1 ,5 
3050 DATA 3,6,9,21,-1,-1,4,-1 
3060 DATA L.64,308,480,100 
3070 DATA F.250,98,294,102 
3080 DATA F,250,306,294,310 
3090 DATA F,390,94,430,106 
3100 DATA F,390,302,430,314 
31 1 DATA F,474,240,488 r 270 
3120 DATA F.474,1 24,488,1 54 
3130 DATA F,58,240,72,270 
3140 DATA L,226,308,322,180 
3150 DATA L,1 60,1 80,480,1 00 
3160 DATA L.64,1 80,1 60,1 00 
3170 DATA END 



Et pour quelques programmes de plus Annexe 3 Page 398 



BOMBARDIER 

Une version du grand classique! Se joue seul centre l'ordinatem*. A partir du 
clavier settlement. 

10 'BOMBARDIER 

20 'COPYRIGHT (C) AMSOFT 1984 

30' 

40 MODE 1:CLS:INK0,0:BORDER0:INK1,18:INK2,6:INK3,4:tNK5 > 15:INK 

6,2:INK 7,24:INK 8.8.INK 9,26:INK 10,10:INK 11,20:INK 12,12:INK 13,16:INK 

14,14:INK 15,21 

50 SYMBOL AFTER 240:SYMBOL 

241,&40,&60,&70,&7F,&7F,&3F,&7,&0:SYMBOL 

242,&0,&32,&7A,&FE,&FA,&F2,&E0,&0 

60 SCORE-0:HIS- 

CORE=0:AVION$-CHR$(241)+CHR$(242):X-2:Y-2:CHUTe-0:A-2:B-2 

70 GOSUB 480 

80CLS 

90 PEN 2:LOCATE 1,15:INPUT "NIVEAU : (AS) A 5 (DEBUTANT) : ",NIV 

100 IF NIV<0 OR NlV>5 GOTO 90 

110NIV-NIV+10 

120 LOCATE 1,1 5:PRI NT CHR$(18);:LOCATE 1,1 5: INPUT 'VITESSBO (RA- 

PIDE)A100(LENT):",VIT 

130 IF VIT>100 OR VIT<0 GOT0 120 

140' 

150'IMMEUBLES 

160' 

170 MODE 0:FOR BASE-5 TO 15:FOR HAUT=21 TO INT(RND(1)*8-fNIV) 

STEP -1 :LOCATE BASE,HAUT:PEN BASE-2:PRINT 

CHR$(143)+CHR$(8)+CHR$(11)+CHR$(244);:NEXT:NEXT 

180 PLOT 0,20,4:DRAW 640,20,4 

190 LOCATE 1,25:PEN 2:PRINT"SCORE";SCORE;:LOCATE 

13,25:PRINrHI";HISCORE; 

200' 

210 'JEU PRINCIPAL 

220 ' 

230 LOCATE X-1 ,Y:PRINT' "; 

240 PEN 1 -.LOCATE X,Y:PRINT AVION$;:PEN 2 

250 IF Y=21 ANDX=15 THEN GOTO 290:ELSE GOTO 340 

260' 

270 'ATTERISSAGE REUSSI 

280' 

290 FOR C-Q TO 1000:NEXT 

300SCORE-SCORE+100-(NIV*2):NIV-NIV-1:X-2:Y-2:A-2:B-2:CHUTE-0 
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310 IF NIV<10THEN NIV-10:VIT-VIT-20 

320IFVIT<0THENVIT-0 

330 GOTO 150 

340 FOR C-0 TO VIT:NEXT 

OCA y ^■V-l.. 1 

360 IFX-18THEN LOCATE X-1.Y:PR INT CHR$(18);:X-2:Y-Y+1:LOCATE ^ 

X,Y:PEN1:PRINTAVION$;:PEN2 * 

370 A$-INKEY$:iF A$=" " AND CHUTE-0 THEN CHUTE-1:B-Y+2:A-X 

380IFY-21THENCHUTE-0 ««_ » „ 

390 IF CHUTE- 1 THEN LOCATE A,B:PRINT CHR$(252);:LOCATE A,B- - 

1 -PRINT' ";:B-B+1:IF B>21 THEN LOCATE A,B:PRINT" ";:B-B+1:IF B>21 J 

THEN LOCATE A,B:PRINT' ";:LOCATE A.B-1 PRINT" gj 

"••_A-0B-0:CHUTE-0:SOUND 3,4000,1 0,1 2,0,0,10 W 

400 GA»(A-0.5)*32:GB-400-(B*1 6):BOMB-TEST(GA,GB) ^j 

410 IF BOMB>0 THEN GOTO 670 

420 GX-((X+1 .5)*32):GY«408-(Y # 1 6):CRASH-TEST(GX,GY) 

430 IF CRASH>0 GOTO 570 

440 GOTO 230 - 

450' 4 

460 'MODE D'EMPLOI 1 

470 ' 

480 LOCATE 1,2:PEN 1 PRINT VOUS PILOTE2 UN AVION AU-DESSUS 
D'UNE VtLLE ABANDONNEE QUE VOUS DEVEZ 'RASER' POUR ATTERIR 
ET FAIRE LE PLEIN DE FUEL. VOTRE AVION SE DEPLACE DE GAUCHE A 

490 PRINT:PRINT' UNE FOIS LE BORD DROIT ATTEINT.L'AVION REVIENT 
A GAUCHE UNE LIGNE PLUS BAS. VOUS DISPOSEZ D'UNE QUANTITE IL- 
LIMITEE DE BOMBES ET VOUS POUVEZ LES LARGUER SUR LES IMMEU- 
BLES EN APPUYANT SUR LA BARRE ESPACE.";:PRINT o ^ T , A W1 

500 PRINT.PRINT" A CHAQUE FOIS QUE VOUS ATTERISSEZ.SOIT LA VI- 
TESSE DE VOTRE AVION, SOiT LA HAUTEUR DES IMMEUBLES AUG- 
MENTE »-:PRINT:PR1NT:PRINT" VOUS NE POUVEZ LARGUER DE BOMBE 
TANT QUE LA PRECEDANTE N'EST PAS EXPLOSEE III"; 
510 PEN 2:LOCATE 1 ,24:PRINT:PRINT"PRESS ANY KEY TO START. ; 
520 A$-INKEY$:IF A$- ,m THEN GOTO 520 

530 RETURN ■ 

540' j 

550 'COLLISION " ] 

560 * 1 

570 LOCATE X-1,Y:PRINT a '„..„*.« 

CHR$(32)+CHR$(32)+CHR$(32)+CHR$(253)+CHR$(8)+CHR$(238)+CHR$(8); 

580 FOR T-1 TO 10:SOUND 7,4000,5,1 5,0,0,5:PEN T:PRINT 
CHR$(253)+CHR$(8)+CHR$(238)+CHR$(8)+CHR$(32)+CHR${8);:FORTM-0 

TO 50:NEXT:NEXT:PEN 2 
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590 CLS:LOCATE 1 ,5:PRINT" SCORP;SCORE; 

600 IF SCORE>HISCORE THEN HISCORE-SCORE:LOCATE 

1,8:PRiNT"MEILLEUR SCORE!!"; f , iM . 1Alirni 

610 SCORE-0:LOCATE 1,12:PRINTTAPEZ'R* POUR REJOUER"; 

620 A$-INKEY$:IF A$-"R" OR A$=V THEN GOTO 630 ELSE GOTO 620 

630 PEN 1:MODE 1:X-2:Y-2:A-2:B-2:GOTO 90 

640' 

650 MMMEUBLES DETRUITS 

660' 

670 LOCATE A.B-1 ■■■"**?* off- 

680 PEN 4 

690 FOR TR-1 TO INT(RND(1)*3)+1 

700 SCORE-SCO RE+5 

710 SOUND 3,4000,1 0,12,0,0,10 

720 LOCATE A,B 

730 FOR T-0 TO 4 

740 PRINT CHR$(253)+CHR$(8)+CHR$(32)+CHR$(8); 

750 NEXT 

760 B=B+1 

770IFB-24THENB-B-1 

780 NEXT 

790 LOCATE 6,25:PRINT SCORE;:CHUTE-0:A-X:B-Y:GOTO 230 
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BUSTOUT 

Simple mais passionnant ! Se joue joue seul contre Pordinateur, a partir du clavier 
ou aves les manettes. 

1 'BUSTOUT BY ALEXANDER MARTIN 

20 'COPYRIGHT (C) AMSOFT 1984 = 

30' ". 

40 MODE ArBORDER A:INK 0,1 :INK 1 ,26:lNK 2,24:INK 3,8 3 

50 SPEED KEY 15,2 

60 ENV 1,1,18,0,1 1,0,10 | 

70 ENT 1,10,2,2 1 

80 ENV 3,1 ,0,16,5,-3,2 *j 

90 ENV 2,5,3,3,1 ,-21 ,22,9,-3,2 | 

100 ENT -2,1 0,2,2,5,-7,1 ,2,1 1,3,2,-4,8 -| 

110' I 

120' 

130 MOVE 30,32: DRAWR 0,400,1 :MOVE 61 0,32:DRAWR 0,400,1 

140 PEN 3:LOCATE 3,1:PRINT STRING$(36,143) 

150 PEN 2:LOCATE 3,2:PRINT STRING$(36,143) 

160 PEN 1:FOR R-5 TO 6:LOCATE3,R:PRINTSTRING$(36,143):NEXTR 

170BX-9 

180LIVES-5:SCORE-0 

190 PEN 1:GOSUB 680:CLEAR INPUT 

200 IF INKEY$oCHR$(32) AND JOY(0}<16 THEN 200 

210 LOCATE 11,23:PRINTSPACE$(20):LOCATE 1,24:PRINTSPACE$(40); 

220 GOSUB 690:GOSUB 660:GOTO 280 

230' 

240' 

250 LOCATE BX,24:PRINT" ";STRING${4,1 31);" ":RETURN 

260' 

270* 

280 XA-1:YA-1:IF INT(RND*2)-1 THEN XA-XA 

290PEN1:GOSUB250 

300 ORIGIN 0,400 

310 X«BX+4:Y-1 1 :X1-X:Y1-Y 

320' 

330 ' 

340 X1 -X+XA:Y1 -Y+YA 

350 IF X1 -3 OR X1 -38 THEN XA-XA 

360 GOSUB 540 

370 IF Y1-24 AND X1>BX+1 AND X1<BX+6 THEN YA-YA:Y1-Y1-2:SOUND 

130,44,8,7,1 ,1 :A-((X>BX+5)OR<X<BX+2)):IF A— 1 THEN 

XA-XA* A:X1 -X1 +XA:Y1 -Y1 +1 
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380 IF Y1 -25 TH EN LOCATE X,Y:PRINT ": GOTO 500 M ^ 

390 GOSUB 250 

400 T-TEST((1 6*X1 )-1 ,-(1 6*Y1 )-1 ) y 

410 IF Too THEN YA-YA:XZ-X1:YZ-Y1:Y1-Y1+YA:GOSUB 590 IF T-2 

THEN SCORE-SCORE+10:GOSUB 660 

420 IFT-3THEN SCORE-SCORE+20:GOSUB 660 

430 IF T-1 THEN SCORE-SCORE+5:GOSUB 660 

440IFY1-1THENYA-1 

450 LOCATE X,Y:PRINT " ":LOCATE X1,Y1:PRINT CHR$(233):X-X1:Y-Y1 

460 IF Y-1 OR X-3 OR X-38 THEN SOUND 129,78,8,7,1,1 

470 GOTO 340 

480' 

490' 

500 LlVES-L!VES-1:SOUND 132,1 9,46,1 2^2:IF UVES-0THEN 620 

51 GOSUB 660:GOTO 280 

520' 

530' 

540 IF (INKEY(8)=0 OR INKEY(74)-0) AND BX>2 THEN BX-BX-2: RETURN 

550 IF (INKEY{1)-0 OR INKEY(75)-0) AND BX<32 THEN BX-BX+2: RETURN 

560 RETURN 

570' 

580 ' 

590 LOCATE XZ,YZrPRINT " ":RETURN 

600' 

610' 

820 IF SCORE>-HISCORE THEN HISCORE-SCORE 

630 GOSUB 660:SCORE=-0:VIES-5:GOT0 130 

640' 

650 ' 

660 SOUND 130,0,20,13,3,0,31:LOCATE 1,25:PRINTTAB(4)"H ISCORE";HIS- 

CORE; 

670 LOCATE 18,25:PRINT"SCORE";SCORE:LOCATE 

30,25:PRINrLIVES";LIVES:RETURN 

680 LOCATE 1 1,23:PRINTPRESS SPACE TO START":RETURN 

690 LOCATE 1 ,25:PRINT SPACE$(40);:RETURN 
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ESCRIME ELECTRIQUE 

Vous devez vaincre votre adversaire ! Ne se joue qu'a deux, a partir du clavier ou 

avec les manettes. 

10 'ESCRIME ELECTRIQUE PAR ALEXANDER MARTIN 
20 'COPYRIGHT (C) AMSOFT 1 985 
30 ' 

40DEFINTA-2 
50 MODE 
60 GOSUB 980 

70GOSUB1370 : 

80 GOSUB 270 | 

90 GOSUB 1520 1 

100 GOSUB 1370 % 

110 GOSUB 1270 1 

120' .1 

130* l 

140 REM DEBUT I 

150 IF FINI THEN GOTO 100 I 

160 GOSUB 240 mar . J 

170 FRAME-.IF P1 DIR THEN GOSUB 570 ELSE FRAME:FRAME ■* 

180 FRAME:IF P2DIR THEN GOSUB 820 ELSE FRAME:FRAME | 

1 90 IF P1 SA-1 THEN GOSUB 870 -} 

200 IF P2SA-1 THEN GOSUB 720 i 

210 GOTO 140 

220 ' 

230 ' 

240 IF J THEN 380 ELSE 480 . ... ... . 

250' 

260 ' 

270 CLS:PEN 6 

280 PRINT:PRINT' CHOIX DES COMMANDES" 

290 PRINT:PRINT:PRINT:PRINT" TAPER <Jx>lkC> puts ENTER* 

300 LOCATE 6,10:PRINT H JOYSTICK";TAB(5); " OU CLAVIER" 

310 LOCATE 15,10:IF J THEN PRINT'*":ELSE PRINT" " 

320 LOCATE 15,12:IF J THEN PRINT' ":ELSE PRINT"*" 

330 IF NOT(INKEY(45)) THEN J-1 

340 IF NOT{INKEY(37)) THEN J=0 

350 IF NOT(INKEY(18)) THEN RETURN ELSE 310 

360' ■ . i 

370' j 

380 P1-JOY(0):P2-JOY(1) -5 

390 P1DIR-(P1 AND 1)*-1+(P1 AND2)*0.5 j 
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400D2DIR-(D2AND1)*-1+(P2AND2)*0.5 . <a. 

410 IF P1 AND 16 THEN P1SA-P1SA-1.IF P1SA— 1 THEN AFTER 15 GOSUB 
770 

420 IF P2 AND 16 THEN P2SA-P2SA-1 :!F P2SA-1 THEN AFTER 15 GOSUB 
770 

430IFP1SATHEN P1DIR-0 
440 IF P2SA THEN P2DIR-0 
450 RETURN 
460' 

470* -r&P*™-- 

480P2DIR=((INKEY(4)»=0)*1)+((INKEY{5)-0)*-1) 
490P1DIR=((INKEY(69)-0)*1)+{(INKEY(71)-0)M) 
500 IF INKEY(63)-0 THEN P1SA-P1SA-1:IF P1SA-1 THEN AFTER 15 
GOSUB 770 

510 IF INKEY (10)-0 THEN P2SA-P2SA-1:IF PS2A-1 THEN AFTER 15 GO- 
SUB 770 

520IFP1SATHENP1DIR-0 
530 IF P2SATHEN P2DIR-0 
540 RETURN 
550' 
560' 

570 PT=P1WP+P1DIR:IF PT>25 OR PT<6 THEN RETURN ELSE P1WP-PT 
580P1D1R-0 

590 PEN 1:LOCATE3,P1WP:CLS #3:PRINT CHR$(209);:RETURN 
600' 
610' 

620 PT-P2WP+P2DIR:IF PT>25 OR PT<6 THEN RETURN ELSE P2WP-PT 
630P2DIR-0 

640 PEN 2-.LOCATE 18,P2WP:CLS#5:PRINT CHR$(211);:RETURN 
650' 
660' 
670 PAPER #4,4:WINDOW#4,4,17,P1WP,P1WP:CLS#4:FRAME:FRAME 

680 PAPER #4,0:CLS #4 

690 GOTO 570 

700' 

710' 

720 PAPER #6,5:WINDOW #6,4,1 7,P2WP,P2WP:CLS#6:FRAME:FRAME 

730 PAPER #6,0:CLS#6 

740 GOTO 620 

750' 

760' 

770 PWPE-(P1WP-P2WP):IF P1SAAND NOT(P2SA) AND PWPETHEN 

P1SC-P1SC+1:SOUND 132,120,10,0,1 ,0:PRINT#1,A$(P1SC);: IF P1SC-9 

THEN 860 
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PING PONG 

C'est le plus vieux de tous les jeux, mais il fait toujours recette ! Vouspouvez 
jouer a deuxou seul contre l'ordinateur, a partir du clavier ou avec les manettes 
dejeu. 

1 *PING PONG BY DAVID RADISIC 

20 'COPYRIGHT (C) AMSOFT 1985 

30' 

40DEFINTA-Z 

50 COMP-1 

60 ENV 1,-11 ,20,-9,5000 

70 MODE 1:INK 0,10:BORDER 1 0:INK 1 ,26:INK 2,18:INK 3,0 

80GOSUB710 

90GOSUB150 . 

100GOSUB330 

110GOSUB420 > 

120 LOCATE 13,1:PRINTUSING"#### H ;SCORE1; 

130 LOCATE 35,1 :PRINT USING"#### ";SCORE2; | 

140 GOTO 100 ,1 

150 PEN 2 -4 

160X(1)-3:Y(1)-5 'a 

170X(2)=37:Y{2)-22 i 

180COTES$-CHR$(233):COTES2$-STRING$(2,207) | 

190 LOCATE 1,3 : 

191 PRINT STRING$(39,COTES$) 

192 PRINT STRING$(39,COTES$) 
200 FORM TO 19 

210 PRINT COTES2$;TAB(38);COTES2$ 

220 NEXT -> 

230 PRINT STRING$(39,C0TES$):PRINT STRING$(39,COTES$); ^ 

240 WINDOW #1 ,3,37,5,23 ,J 

250 CLS#1 si 

260 SYMBOL 240,0,60,1 26,126,126,126,60,0 3j 

270RAQUETTE$= i, u m +CHR$(8)+CHR$(10)+"Cj" -.1 

280 EFF$-" "+CHR$(8)+CHR$(1 0)+" " 5j 

290 BALLE$-CHR$(240) -| 

300 PEN 3 

310 LOCATE 2,1:PRINT\JOUEUR 1 : 0";:LOCATE 24,1 :PRINrJOUEUR 2 : 0"; 

320 RETURN 

330 N«INT(RND*2):CLS #1 :SCORED-0 

340 PEN 3 

350 FOR 1-1 TO 2:LOCATE X(I),Y(I):PRINT RAQUETTE$;:NEXT ] 

360 ON N GOTO 390 1 
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370XB-21:DX-1 

380 GOTO 400 

390XB-19:DX— 1 

400YB-12:DY=INT(RND*3)-1 

410 RETURN 

420 GOSUB 600 

430 OXB-XB:OYB-YB 

440 GOSUB 500 

450 IF NOTE>0 THEN SOUND 129,NOTE,50,15,1 

460 LOCATE OXB,OYB:PRINT" "; ....^...i ,., 

470 LOCATE XB,YB: PRINT BALLE$ 

480 IF SCORED=0 THEN 420 

490 RETURN 

500 LOCATE XB+DX,YB+DY:CH$-COPYCHR$(#0) 

510NOTE-0 

520 IF CH$~" " THEN XB-XB+DX:YB=YB+DY: RETURN 

530 IF CH$="u"THEN DX-2-DX-2:DY=INT(RND*3)-1:NOTE-200: RETURN 

540 IF CH$-LEFT$(COTE2$,1) THEN 570 

550 IF CH$-COTES$THEN DY«2-DY-2:NOTE«250 

560 RETURN 

570 IF DX>0 THEN SCORE1-SCORE1+1 ELSE SCORE2-SCORE2+1 

580 SCORED-1 :NOTE=2000 

590 RETURN 

600P(1)-(INKEY(69)>-0)+(INKEY(72)>-0)+ABS((INKEY(71)>-0)+ 

(INKEY(73)>=0))*2 

610 IF COMP-1 THEN P(2)=ABS{Y(2)<YB)*2+(Y(2)>YB):GOTO 630 

620P(2HINKEY(4)>-0)+(INKEY(48)>=0)+ABS((INKEY(5)>-0)+(IN- 

KEY(49)>=0))*2 

630 PEN 3 

640 FOR 1-1 TO 2 *"' : 

650 LOCATE X(I),Y(I)+P(I):CH$=COPYCHR$(#0) 

860 IF CH$-" " THEN LOCATE X{I),Y(I):PRINT EFF$;:Y(l)-Y(l)+ROUND(P(l)/2) 

670 LOCATE X(I),Y(I):PRINT RAQUETTE$; 

680 NEXT 

690 PEN 1 

700 RETURN 

71 PEN 2:PRINT:PRINT TAB(1 5)"P!NG-PONG":PRINT TAB(1 5)" ■ 

720 PEN 3:PRINT:PRINTTAB(14)"POUR UTILISER LES RAQUETTES : H 

730 PRINT:PRINT:PEN 1 

740 PRINT' JOUEUR1 JOUEUR 2 DIRECTION":PRINT 

750 PRINT' Q 6 HAUT" 

780 PRINT' W 3 BAS*':PRINT 

770 PEN 3:PRINT:PRINTTAB(14)"OU LES JOYSTICKS" 

780 PRINT:PRINT:PRINT:PRINT 
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790 PEN 2 

800 PRINT TAB(6)" CHOIX: <1> OR <2> JOUEURS" 

810 l$-INKEY$:IF l$o"1" AND l$o"2"THEN 810 

820 IF l$- n 1" THEN COMP-1 ELSE COMP-0 

830 MODE 1:RETURN 
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INDEX 



! 

464 

Chargementdelogiciefe 21 

Charger une cassette . 10 

Contrdle des cassettes 8 

insertion des disquettes 1 1 

Protection contre Pecriture 1 0, 12 

Protection des cassettes 10 

Touches de contrdle du lecteur 9 

6128 

Chargement des logictels ,. 20 

Copiedefichiers 195 

Creation d'un profit 1 94 

Duplication de la disquette systeme 194 

Introduction a CP/M 194 

Progidels en BASIC 196 

Progiciels sous CP/M 196 

A 

A..... . ........... . 207 

ABS 106 

Addition 34 

AFTER 106,316 

AMSDOS 200 

Catalogue d'une disquette 201 

Changement de disquette 201 

Commandes dans un programme 205 

Commandes extemes . 207 

Construction d'un nom de fichier ...... 202 

En-tetes des fichiers 202 

Erreurs sur disquettes 258 

Messages d'erreur 210 

noms et genres des fichiers 201 

Sauvegarde de variables 205 

AND 107,306,337 
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....34 
Arithmetique simple """."...107 

ASC ZZ.".."l07 

ATN **■ JQ8 

AUTO 



B 

207 

|B .. •"- 82,284,341 

Bank Manager 285 

Stockage des images ecran 288 

pANKREAD 287 

|BANKOPEN 287 

|BANKWRITE - 

BASIC 296 

Bases 2 g 2 

L'interpreteur Z.255 

Messages d'erreur *2gQ 

Motscles 108 

BINS 71*298 

Bits et octets 1 qq 

BORDER 109 

BREAK 

Brochages 2 66 

Manette de jeu • 269 

Portimprimante "ggy 

Prise analogique 268 

Prise auxiliaire 268 

Prise d'extension 2 go 

Prise lecteur 2 (6128) " 267 

Prise moniteur 287 

Prise stereo 



C 

37 

Calculs composes 1 gg 

CALL 235 

Caracteres ASCII et graphlques 278 

Caracteres de contrfile ^ 

Caracteres ofcfinis 

Cassettes j 

Index 
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Choix 47 

CAT ZZZZSejio 

Catalogue 44 

Cercte 

Positionnement du centre 63 

Cerdes 52 

CHAIN Z.ZZ! 111 

CHAIN MERGE "j11 

Charge rapide * ."""."..48 

Chargement des jeux sur cartouche ... 20 

CH R$ j 1 2 

CHR$() ZZZZm 

CINT 113 

Clavier 220 

CLEAR ZZZZZZZZIl13 

CLEAR INPUT 113 

CLG ZZZZZl14 

CLOSEIN j 1 4 

CLOSEOUT Z!.'l14 

CLS 24,115 

Codes de contrGte 2 1 4, 230 

Codes de controles , .'. 231 

CommandeDIR 216 

Commande DIRS ou DIRSYS ZZZZZZZZ 2 1 6 

Commande ERA ou ERASE "".216 

Commande REN ou RENAME ZZZ" 21 7 

Commande TYPE ou TYP ZZZZ.Z21 7 

Commande USER ou USE ZZZZZZZI21 7 

Commandes en mode direct 2 1 6 

Commandes transitoires 218 

Configuration ZZZ"Z...2 

Configuration de I'eaan 52 

Connexions 266 

cont ZZZZZZZZZIZ.'"ii5 

COPYCHRS 1 15 

COS .....116 

Couleurs 51,219 

Couleurs cliqnotantes '...55 

CP/M 193,212 

ICPM 207 
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CREAL \\l 

CURSOR llb 



D 

DATA "7.317 

DECS • i 

DEFFN « 

DEFREAL ]]• 

DEFSTR 19 

DEG ™ 

DELETE 20 

DERR 20 

Dl u * 

dim";;;;;;;; 122 

IdirIZZZZ 2 f. 

DISC KIT •*» 

DISCKIT ™ 

Disquettes ]?? 

Preparation d'une disquette de travail ' 93 

Division ~j 

Division entire "i 5 

DRAW 61,1 22, 123, 334, 337 

DRAWR fj 

|DRIVE 208 



E 

Ecran 
Resolution • 2 *2 

Ecrire un programme 91 

EDIT ] f 

Editer un programme • 2 ° 

El • 124 

ELSE 124 

Emulateurdeterminaux 277 

END 124 

ENT 124,328 

Entreesysorties supplemental res 276 
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ENV 126,324 

Enveloppe de tonalite 75 

EOF 127 

|ERA....... 208 

ERASE , 127 

ERL 128 

ERR 128,259 

Enreur de syntaxe 19 

Erreurs de lecture 22 

ERROR 128 

EVERY 129,316 

EXP 129 

Expressions log Iques . ....... ...... 305 



Hchiers 

AMSDOSaen-tete > 209 

ASCII 209 

Binaires — 48 

Copies entre disquettes 209 

Lecture seulemerrt 209 

Noms pour deux unites 203 

NomssousCP/M 215 

Proteges 48 

Virtuels 287 

Fichiers 

Type ASCII — ........ .... ............ 48 

FILL .. 65,130,334 

FIX 130 

FN 130 

Fonction des touches ...... 1 5 

FOR 130 

FOR et NEXT 31 

Formatage 39 

FRAME 60, 1 31 , 337 

FRE 132 
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Gestion du systeme ^ 

GOSUB 32,132 

GOTO •• 26 ' 132 

GRAPHICS PAPER 1 3 2 

GRAPHICS PEN - 1 33, 335 

Graphiques 58,333 

H 

HEX$ 1: * 

HIMEM 



,134 



■ i 

IF ;. 30,134 

Imprimante 2 ^ 9 

Imprimantes 221 

INK 135 

INKEY 135 

INKEY$ 13 6 

INP 137 

INPUT 27,137,317 

INSTR 138 

INT 138 

Interface serie 222 

Interruption de programme 2 34 

i 

Jeu de caracteres - 302 

Jeu de caracteres du CP/M - — 281 

Jeu de demonstration j 

Choix 4 ' 

Jeux de caracteres 21 9 

Jokers 2 W 

JOY 138 



K 



i 
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key w — —tag 

KEYDEF - r 

L 

LEFTS « J« 

LET - U1 

LINE INPUT •■•■•• ^ 

LIST 25,42 

LOAD ■""■ \f n 

LOCATE S 8 ']^ 

LOG - 143 

LOG10 144 

Logiciets 

Chargement ■•*" 

LOWERS - 144 

M 

Manettesdejeu ■•—•271 

MASK 144 -^j 

MAX \f A 

Memoire *74 

MEMORY : ]« 

MERGE •••;;■ • « 

MID$ 146 ' 47 

MIN 14 7 

Mise en marche ••^ 

MOD f 

MODE - 14 ° 

Modulo f. 

Mots cles du BASIC AMSTRAD :"'•"""""„ 

MOVE 81 . 148, 334, 337 

MOVErZZIZ W>™ 

Multiplication ™ 



N 



index 
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149 

NEW _ 1S0 

NEXT 150 

not __-. ::;::izi.25o 

Numeros des touches 



O 

152 

ON .. GOSUB ........ —— 1 _ 

ON BREAK CONT 151 

ON BREAK GOSUB 151 

ON BREAK STOP 152 

ON ERROR GOTO m 

ON SQ GOSUB 33Q 

ON SQ( ) GOSUB 153 

ON..GOTO * 154 

OPENIN 155 

openout ::::::::::::: iE mss? 

OR 64, 157 

ORIGIN j 57 

OUT 



158 

PAPER... ~~ ~ 158 

PEEK. — . 159 

PEN ^ 

Peripheriques , 

Amplificateur et enceirTtes extemes ■ — 

Connexion • * — ••••—••■•••••• 

Crayon optique et pistolet j 

D'extension 218 

Gestion • * g 

Imprimante • g 

Joystick analogique g 

Manettesdejeux "'■■59 

PI -••-• '* 339 

Planscolores IZZZeb J 58^337 

SSniI==^^ m 'Z 

POKE 



Page 41 8 Annexe 4 



POS . 161 

PRINT 24,161,309,337 

PRINT SPC 162 

PRINT USING 163 31 1 

PROFILESUB .'.213 

Programmation 24 

Programmes 

Copie 49 

Protection en ecriture 81 

Puissances '. 36,38 



Racine carree *..„.*... ........ ............. ................. 35 

Racines cubiques 36 

RAD ."....'....'.! 165 

RANDOMIZE 165 

READ 165,317 

References des touches 248 

RELEASE 1^7324,329 

REM 32,166 

REMAIN 167 

|REN 1™208 

RENUM 167 

RESTORE 168,319 

RESUME 168 

RESUME NEXT 1 69 

RETURN 1 69 

RIGHTS 170 

RND 170 

ROUND 171 

RUN LL5j71 



Sauvegarde .. ...... ..... ... 38 

Sauvegarde d'un programme 44 

Sauvegardes 47 

SAVE 172 

ISCREENCOPY 286 



Index Annexe 4 Page 41 9 



(SCREENSWAP — . 286 

SGN ™ 

SIN ™ 

Sons.. „ f 

Periodessonores ~' 

Utilisation TTrnw 

SOUND 71,174,321 

Brurtage !A 

Duree 'i 

Enveloppe de tonality '* 

Envetoppe de volume !} 

Etat decanal 7} 

Periodesonore ]} 

Volume 2 

SPACES ~"J 

SPC •?i2 

SPEED INK J™ 

SPEEDKEY 2 

SPEED WRITE ]JJ 

SQ 177 

SQR 1 ™ 

SQR() * 



STEP. 



.31,17? 



STOP 1 



STR$. 



1 

STRINGS 1 

Super Prudent 

SWAP : 

SYMBOL 

SYMBOL AFTER \ 

Systeme binaire ^ 

Systeme decimal * 

Systeme hexadecimal £ 

T 

TAB 1 82 - 

TAG 183,336 : 

TAGOFF 1 ^ : 



< 
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^ 



184 

TAN "... 184 

TEST ^ 184 

TESTR 185 

THEN 185 

TIME 1 85 

TO 17 

Touche CAPS LOCK 1 6 

ToucheDEL ■• 16 

Touche ENTER • 1 8 

TouctieESC 15 

Touche RETURN 15 

Touches de deplacement 249 

Touches programmables 16 

Touches SHIFT 1 86 

troff ;;; iw 

TRON 



U 186 

UNT 186 

UPPERS ""."". 208 

IUSER 187 

USING 



V 187 

val ;ZZI 303 

Variable 49 

Vidage d'ecran 187 

VPOS 



w -— « 

WAIT " 188 

WEND 188 

WHILE 189 

WIDTH 1 89, 31 3 

WINDOW 190,314 

WINDOW SWAP "2 190 

WRITE 
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7~ I 

191,306,337 

XOR . 1 91 

XPOS 

Y * .. . m \ 

YPOS 

1 26, 192 ^ 

ZONE 
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